在当前Excel工作表通过VBA代码提取外部Excel工作簿内容示例。
方法一:例如在当前工作表A1单元格,获取外部Excel工作簿test.xlsx,第一个工作表A1的内容。
Sub Extract_Open01() Dim myApp As New Application Dim wkSht As Worksheet '隐藏Excel myApp.Visible = False '打开数据文件,并指定工作表对象 Set wkSht = myApp.Workbooks.Open(ThisWorkbook.Path & "\test.xlsx").Sheets(1) [A1] = wkSht.[A1] '关闭Excel myApp.Quit Set wkSht = Nothing Set myApp = Nothing End Sub
方法二:例如在当前工作表A2单元格,获取外部Excel工作簿test.xlsx,第一个工作表A2的内容。
Sub Extract_Open2() Dim myObj As Object ' GetObject 返回工作表对象的引用 Set myObj = GetObject(ThisWorkbook.Path & "\test.xlsx") [A2] = myObj.Sheets(1).Cells(2, 1) '关闭工作簿 myObj.Close Set myObj = Nothing End Sub
如何将Excel表格里所有批注快速批量提取出来
我们在使用Excel表格时经常会对一些单元格做一些备注,通常...2020-10-31Excel工作簿有多个数据透视表如何实现批量刷新
我们在使用Excel做数据统计时,可能一个工作簿会有很多数据...2020-12-22ODBC数据源管理器找不到Excel Driver Acce
我们在做VBA编程需要读写外部数据时,常用到外部数据源,例如...2020-11-16使用VBA操作Word中的表格定位表格位置
新建一个空白文档,插入一个三行三列的表格,在VBA编辑窗口的...2020-10-31Excel自动添加复选框控件及事件代码
Excel VBA开发的自动添加复选框(CheckBox控件...2020-10-3175例常用的带解释的Excel VBA代码示例
对于VBA的初学者来说,很想了解一些常用的VBA代码,在日常...2020-11-09用'FileDialog'作用于对象'_Applicatio
我们在使用VBA代码时,用时候要用到打开选择文件功能,一般会...2021-04-24将VBA编写的函数过程封装成DLL组件并在Office\Ex
我们在使用Office办公软件时,有时候要扩展功能或实现自动...2021-04-23