主页 > 数据处理 > VB如何调用excel中的数据。

VB如何调用excel中的数据。

2022-05-09 00:48来源:m.sf1369.com作者:宇宇

要使用VB操作EXCEL,必须引用EXCEL对象,方法与步骤如下:
'首先通过VB的菜单 [工程] -- [引用],勾选:Microsoft Excel XX.X Object Library
'其中XX.X,要看你计算机安装的OFFICE版本而定
Private Sub Command1_Click()
Dim xlsApp As Excel.Application '声明对象变量
Set xlsApp = Excel.Application '实例化对象
xlsApp.Visible = False '使Excel隐藏不可见
xlsApp.Workbooks.Open (C:\1.xls) '打开EXCEL文件,假设文件在c盘根目录
Dim i As Long
i = 1
Do While xlsApp.ActiveWorkbook.Sheets(sheet1).Cells(i, 1)
If xlsApp.ActiveWorkbook.Sheets(sheet1).Cells(i, 1).Value = Text1.Text Then
Label1.Caption = xlsApp.ActiveWorkbook.Sheets(sheet1).Cells(i, 2).Value
Exit Do
End If
i = i + 1
Loop
xlsApp.ActiveWorkbook.Close savechanges:=False '关闭活动工作簿同时不保存对它的更改。
xlsApp.Quit '关闭EXCELL
Set xlsApp = Nothing '释放资源
End Sub

相关推荐

车联网企业国内有哪些?

数据处理 2023-12-23

注册计量师-请教贴

数据处理 2023-12-19

逆光照片怎么处理

数据处理 2023-12-08