下图为当前工作簿:
点击按钮,即可打开另一个工作簿:
下面为使用代码打开另一个工作簿的图示:
在日常办公中,学会使用代码打开工作簿,可实现多工作簿数据直接在代码中
提取,以及各种操作,来看下实际代码:
ThisWorkbook.path ‘当前文件的文件目录
GetWbk(path) '使用以下函数去打开工作簿
s = Split(name, "") '使用 "" 分隔成数组
s(UBound(s)) '取文件名 =
Workbooks(s) ‘变量赋值该工作簿 =
On Error GoTo erroX '赋值错误时 跳转到指定行
erroX:
Workbooks.Open(name) '错误发生就打开该工作簿 =
这样就完成操作啦
本代码可收藏到VBA代码助手,并且只要输入关键字即可快速搜索随时调出
下载地址 http://ftp.excel880.com/#s/8G6bRADg