vb读写excel文件
请教
怎么实现用VB的按钮选择本地硬盘中的任意xls文件,然后显示sheet1中第2行第6列的数据。
我是菜鸟,最好能解释的详细一点。
谢谢了
[解决办法]
我也菜,你看下这个应该可以用:
Dim ex As Object
Dim wb As Object
Dim sh As Object
Private Sub Command1_Click()
Set ex = CreateObject("Excel.Application")
'Set wb = ex.Workbooks.Add
Set wb = ex.Workbooks.Open("c:\1.xls") '打开你的EXCEL文件
Set sh = wb.Sheets(1) '指定工作表sheets1
sh.cells(1, 1) = "A" '把第一行第一列改成A
sh.cells(1, 2) = "B" '把第一行第二列改成B
sh.cells(2, 1) = "C" '把第二行第一列改成A
sh.cells(50, 2) = "D" '把第50行第二列改成A
ex.Visible = True
Set ex = Nothing
Set wb = Nothing
Set sh = Nothing
End Sub
如果想显示它则用:print sh.cells(2,6)
[解决办法]
VB6 操作EXCEL
网络上很多的.问下谷鸽神兽吧
http://www.cnblogs.com/saptechnique/articles/1172905.html
[解决办法]
[解决办法]
没保存
excelApp.SaveAs sFile