Question

VBA能实现提取一个单元格值到指定文件夹查找并打开该值文件么？

Answer 1

举个例子：
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"
在符号&的左右两边都要各留一个空格。