使用VBA从Word编辑Excel数据

如何使用VBA从单词编辑Excel电子表格？

Answer 1

首先，您需要设置对您正在运行的Excel版本的引用。 在VBE中，转至工具>参考，然后单击Microsoft Excel 12.0对象库（2007年为12.0，2003年为11.0）等

然后你可以编写这样的代码（打开一个新的Excel实例，打开，编辑并保存一个新的工作簿）。 您将使用GetObject来访问正在运行的Excel实例：

Sub EditExcelFromWord() Dim appExcel As Excel.Application Dim wb As Excel.Workbook Dim ws As Excel.Worksheet Set appExcel = CreateObject("Excel.Application") With appExcel .Visible = True Set wb = .Workbooks.Add Set ws = wb.Worksheets(1) ws.Range("A1").Value2 = "Test" wb.SaveAs ThisDocument.Path & Application.PathSeparator & "temp.xls" Stop 'admire your work and then click F5 to continue Set ws = Nothing Set wb = Nothing Set appExcel = Nothing End With End Sub