[英]Add text to excel cells with vba in word
在 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
你對此有什么建議嗎?
用:
MyWB.Sheets("Sheet1").Cells(1, 1).pasteSpecial Paste:=xlPasteValues
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.