- 相關(guān)推薦
excel vba如何打開(kāi)
用excel VBA 編寫(xiě)打開(kāi)和關(guān)閉多個(gè)工作薄,相應(yīng)的代碼如下:
1、打開(kāi)指定工作簿
dim wb as workbook
set wb = " 文件路徑及文件名"
workbooks.open filename:= wb
2、關(guān)閉所有工作簿并保存
workbooks.close
3、打開(kāi)多個(gè)工作薄的程序代碼:
Sub OpenWorkbooks()
On Error Resume Next
Dim SelectFiles As Variant
'顯示打開(kāi)文件對(duì)話框
SelectFiles = Application.GetOpenFilename("Excel 文件 (*.xl*)," & "*.xl*", , "打開(kāi)", , True)
'未選擇
If TypeName(SelectFiles) = "Boolean" Then
Exit Sub
End If
'打開(kāi)所選工作簿
For i = 1 To UBound(SelectFiles)
Workbooks.Open SelectFiles(i)
Next i
End Sub
【excel vba如何打開(kāi)】相關(guān)文章:
如何打開(kāi)幸福的大門(mén)?11-26
APPX文件如何打開(kāi)07-31
如何打開(kāi)xlsx文件11-27
如何打開(kāi)jsp文件11-27
怎么解決Excel打開(kāi)時(shí)出現(xiàn)stdole32.tlb問(wèn)題07-27
雙語(yǔ)閱讀:如何打開(kāi)幸福的大門(mén)?11-26