Question

如何用VBA在Excel中查找指定文件中PDF图片并打开它

各位大侠，请教一下我想用VBA在EXCEL做一个查询电脑中指定文件下的PDF图片并打开它，就是一个输入框中接收图片名，一个按钮触发查询并打开它，跪求代码，谢谢

Answer 1

Sub openpdf()
Dim path$
Dim name$
Dim fullname$
name = InputBox("请猜念输入文件名举租称（不含扩展名）")
path = "G:\360data\重要数据\桌面\"
fullname = path & name & ".pdf"
CreateObject("Wscript.Shell").Run 穗答困(fullname)
End Sub

追问

代码是直接放在按钮下执行吗？

追答

这个是放模块里面的，放按钮下面的是这样的 ，开头不一样的

Private Sub CommandButton1_Click()
Dim path$
Dim name$
Dim fullname$
name = InputBox("请输入文件名称（不含扩展名）")
path = "G:\360data\重要数据\桌面\"
fullname = path & name & ".pdf"
CreateObject("Wscript.Shell").Run (fullname)
End Sub