excel vba打开excel文件

现在在一个String中保存了需要打开excel的路径,例如d:\excel.xls,请问在vba中怎么编写,打开该excel文件?谢谢
ps:不需要显示该excel,我需要在后台对该excel进行处理

dim mypath as string,svalue ’定义变量
mypath="d:\excel.xls"   '把路径赋值给一个字符串
 Workbooks.Open Filename:=mypath '这句是打开文件
 activeworkbook.visible=false '这句是隐藏文件
 svalue=activeworkbook.sheets(1).range("a1").value '这句是用变量取得该文件表1中a1单元格的值
 activeworkbook.viseble=true’显示文件
 activeworkbook.close true'/false,这句是关闭文件,close有两个参数,true是关闭保存修改,false是关闭时不保存修改

温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-07-17
不知道这样符不符合你的要求(一个打开,一个恢复显示):

Sub 后台打开()
Application.ScreenUpdating = False
Workbooks.Open Filename:="D:\excel.xls"
ActiveWindow.Visible = False
Application.ScreenUpdating = True
End Sub

Sub 取消隐藏()
Windows("excel.xls").Visible = True
End Sub追问

那请问怎么调用这个excel的内容呢?比如我想调用sheet中A1的值该怎么写?还有怎么关闭这个excel的打开??谢谢了!

第2个回答  2018-03-30

Excel VBA功能虽然很强大,但因为涉及编写程序,所以使用该功能的人很少。Excel2007和以上版本中,VBA功能被隐藏了起来,不显示在菜单上。如果想使用编写VBA的功能,首先需要将其显示出来。

Excel VBA功能虽然很强大,但因为涉及编写程序,所以使用该功能的人很少。Excel2007和以上版本中,VBA功能被隐藏了起来,不显示在菜单上。如果想使用编写VBA的功能,首先需要将其显示出来。

本回答被网友采纳
第3个回答  2013-07-17
Sub 宏1()
Workbooks.Open Filename:="C:\excel" & ".xls"
End Sub
相似回答