excel vba如何打開

excel vba如何打開

　　用excel VBA 編寫打開和關閉多個工作薄，相應的代碼如下：

　　1、打開指定工作簿

　　dim wb as workbook

　　set wb = " 文件路徑及文件名"

　　workbooks.open filename:= wb

　　2、關閉所有工作簿并保存

　　workbooks.close

　　3、打開多個工作薄的程序代碼：

　　Sub OpenWorkbooks()

　　On Error Resume Next

　　Dim SelectFiles As Variant

　　'顯示打開文件對話框

　　SelectFiles = Application.GetOpenFilename("Excel 文件 (*.xl*)," & "*.xl*", , "打開", , True)

　　'未選擇

　　If TypeName(SelectFiles) = "Boolean" Then

　　Exit Sub

　　End If

　　'打開所選工作簿

　　For i = 1 To UBound(SelectFiles)

　　Workbooks.Open SelectFiles(i)

　　Next i

　　End Sub

【excel vba如何打開】相關文章：

如何打開幸福的大門？11-26

APPX文件如何打開07-31

如何打開xlsx文件11-27

如何打開jsp文件11-27

如何讓Excel表格行列自動求和11-27

怎么解決Excel打開時出現stdole32.tlb問題07-27

雙語閱讀：如何打開幸福的大門？11-26

excel2007如何標記重復數據11-27

EXCEL如何清除單元格內容和格式11-27

WPS如何設置默認打開方式11-27