VB读取excel表格数据

[lx9843]

我现在用VB已经实现了对excel表格数据的读取，可是路径是固定的，如果需要其他的excel文件呢，所以想请教高手能不能将读取excel文件的路径改为动态的呢？还有请教一下，实现打印功能的代码该怎么写？我用VB调用的excel的宏，可是不能每一张excel中都加载同样的宏吧？所以劳驾高手们帮帮忙。

[jhone99]

用CommonDialog控件动态获取
把宏的代码改写到vb中

[jhone99]

With CommonDialog1
.DialogTitle = "Select Excel File To Open"
.Flags = cdlOFNPathMustExist
.Filter = "Excel Files (*.xls)|*.xls"
.FileName = "*.xls"
.InitDir = App.Path
.ShowOpen
txtFilePath = .FileName
End With

[熊孩子开学喽]

选择文件的方法有很多,可以用COMMONDIALOG控件(需要手工添加到工具箱),也可以用工具箱里默认的DRIVER\FOLDER\FILE控件来改变路径选择文件.

[zhan198271]

看看这段代码http://www.dow88.cn/Article/View.asp?id=416