如题所述
举个例子:
strfilename = "C:\Users\ABC\Desktop\" & Sheet1.Cells(1, 1).Value & ".xlsx"
If Dir(strfilename) <> "" Then
Application.Workbooks.Open strfilename
End If追问
strfilename = "C:\Users\ABC\Desktop\" & Sheet1.Cells(1, 1).Value & ".xlsx"
If Dir(strfilename) <> "" Then
Application.Workbooks.Open strfilename
End If追问
我想做一个按钮来触发这个,也是这个程序么?
追答可以的,把它放在按钮的click事件中,修改一下就可以用了。strfilename是一个变量,你只要想办法把带路径的文件名赋给这个变量就行。
追问就用上面那个格式,等于就好了么?
我就在那个单元格插入一个按钮,然后指定这个宏程序。这样吗?
还在么?
追答在
图片看不清楚
追问提示编译错误
把你代码发过来看看
图片还是不清楚啊
追问嗯
Strfilename=''G:新建文件夹''&sheet1.cells(1,1).value&value".xlsx"
提示后面".xlsx"缺少语句结束
追答Strfilename=''G:\新建文件夹\''&sheet1.cells(1,1).value"&".xlsx"
改成这个试一下
追问一样的
还是提示那个错误
追答sheet1.cells(1,1).value的值是什么?
Strfilename=''G:\新建文件夹\''&sheet1.cells(1,1).value"&".xlsx"
在符号&的左右两边都要各留一个空格。
温馨提示:答案为网友推荐,仅供参考