使用VBA读取指定Excel文件指定Sheet指定单元格的内容

使用VBA编辑器在Excel中读取并显示单元格内容

最新推荐文章于 2025-02-20 10:09:18 发布

转载最新推荐文章于 2025-02-20 10:09:18 发布 · 4.6w 阅读

文章标签：

#vb #excel

VB 同时被 2 个专栏收录

2 篇文章

订阅专栏

Excel

2 篇文章

订阅专栏

本文详细介绍了如何通过VBA编辑器在Excel中读取指定工作簿和工作表的特定单元格内容，并将其显示为消息框。此教程适合希望在Excel自动化操作中涉及数据提取的用户。

打开一个Excel文件，选择菜单栏上的"Tools"选项->Macro->Visual Basic Editor，打开VBA编辑器。

在Modules文件夹下的csMain文件中，写下如下VB格式的代码：

Public Sub Source做成()

'声明Excel相关
    Dim xlApp As Excel.Application
    Dim xlBook As Excel.Workbook
    
    Set xlApp = New Excel.Application
'获取指定excel文件
    Set xlBook = xlApp.Workbooks.Open("C:\test.xls")

    Dim sheet As Excel.Worksheet
'获取指定sheet
    Set sheet = xlBook.Worksheets(2)
    
    Dim ss As String
'获取指定单元格的内容
    ss = sheet.Cells(2, 2)
    
'内容显示
    MsgBox (ss)
  
End Sub