Question

VB编程打开任意位置的excel文件

运用commondialog控件，在电脑中调用程序，然后打开。给定我一个确定的路径我会打开，但是像这样路径不确定是变化的，就不知所措了，有会的吗？麻烦给一个详细的程序，并给出注释

Answer 1

commondialog控件，不是可以随意选择文件夹么！

你的代码是什么样的，难道不能自己选择路径么！？

追问

我定义了一个文本2个按钮一个commondialog。文本是显示选择的地址，一个按钮是选择路径，一个是确定。选择路径的按钮代码
CommonDialog1.ShowOpen
Text1.Text = CommonDialog1.FileName

追答

你的代码是没有问题啊，问题是选择路径这个按钮点了之后应该是可以自由选择文件夹的啊。
你选择完了然后点击确定按钮，那么Text1就会记录你选择的文件啊！！

追问

是的，但是接下来我要打开这个文件，怎么编程？我用的是这个程序，但是只能打开确定地址的程序Set wbmybook = appexcel.Workbooks.Open(" 地址 ")所以卡在这里了

追答

Tex1.Text里面显示的应该是：C:\my documents\xx.xls
类似于上面的这个路径+文件名。
所以可以直接打开：Set wbmybook = appexcel.Workbooks.Open(Text1.Text)

追问

谢谢，成功了，能说说这括号里加了双引号和不加双引号的区别吗，按你这不加就成功了，我自己加了就失败了

加载成功出现这个，点击确定出现excel表，这是什么意思？

追答

在VB语言里面加双引号就表示字符串，对于变量和控件属性的引用不能使用引号。