1

我的情况与以下帖子非常相似:

访问查询到 excel 2010 以通过 vba 创建图形

就我而言,我导出了一个表格,但我想对 Excel 文件做更多的事情。

首先,我想重命名 Excel 文件第一张表上的选项卡,因为它以时髦的表名导出。因此,我想将其更改为“MyTable as of (add a date variable here)”而不是“tblThisIsMyTable”

其次,我需要创建一个数据透视表并在另一个选项卡上制作数据透视表的副本,以更改其中一个参数。

我的问题是,我可以在 Excel 中录制一个宏来执行基本步骤并将该代码放入我的 Access VBA 中吗?

我希望我足够清楚,并感谢您提供的任何帮助。

4

1 回答 1

3

我的问题是,我可以在 Excel 中录制一个宏来执行基本步骤并将该代码放入我的 Access VBA 中吗?

是的,一点没错。

在 Access 中,您可能需要添加对 Microsoft Excel 库的引用。

然后,您需要对“记录的”宏进行一些更改,以便它创建 Excel.Application 的新实例,并打开所需的文件和工作表。例如,

Sub OpenExcel()
Dim xlApp as Excel.Application
Dim xlWB as Excel.Workbook
Dim xlSh as Excel.Worksheet

Set xlApp = New Excel.Application
Set xlWB = xlApp.Workbooks.Open("C:\Your filename.xlsx") '<modify as needed
Set xlSH = xlWB.Sheets("Sheet Name") '<modify as needed

'You can paste the recorded macro in here
'
'
'
'
'

xlWB.Save
xlWB.Close
xlApp.Quit
Set xlApp = Nothing

End Sub
于 2013-04-11T20:21:18.623 回答