excel vba如何打开

时间:2021-02-14 20:15:46 网络知识 我要投稿

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如何打开】相关文章:

excel如何隐藏行列12-05

唱歌如何打开喉咙10-26

如何打开zip文件12-08

php文件如何打开12-06

iso文件如何打开11-01

如何用excel做目录12-18

excel 如何隐藏行列呢10-24

excel表格如何隐藏行列10-24

教你如何打开445端口09-01

唱歌时如何打开喉咙08-15