excel - 在word中使用vba将文本添加到excel单元格

Question

在 Word 程序中，使用以下 VBA 代码，我可以从 Excel 文件单元格中复制：

Dim MyExcel As Excel.Application
Dim MyWB As Excel.Workbook
Set MyExcel = New Excel.Application
Set MyWB = MyExcel.Workbooks.Open("C:\Users\...\Desktop\test.xlsx")
    MyWB.Sheets("Sheet1").Cells(1, 1).Copy
MyWB.Close False
Set MyExcel = Nothing
Set MyWB = Nothing

但我无法使用以下行更改代码在 Excel 文件中输入值：

MyWB.Sheets("Sheet1").Cells(1, 1).FormulaR1C1 = "123"

或者

MyWB.Sheets("Sheet1").Cells(1, 1).paste

你对此有什么建议吗？

标签： excelvbams-word

Answer 1

利用：

MyWB.Sheets("Sheet1").Cells(1, 1).pasteSpecial Paste:=xlPasteValues