0

以下是我尝试过的代码片段

       r.Cells(3).Range.Copy()
       .Sheets("sheet4").Range("F" & k).Select()
      .Sheets("sheet4").Cells(k, 6).Columnwidth = 14
      .Sheets("sheet4").paste()
                k = k + 1                                                            

这不会复制一个单元格内的整个字符串。我尝试使用 pastespecial()

当我使用 pastespecial 它显示错误 pastespecial 不是应用程序类的成员

     .Sheets("sheet4").Range("F" & k).pasteSpecial(ExApp.XlPasteType.xlPasteAll, False, False)

任何帮助,将不胜感激。

4

1 回答 1

0

我以前从未尝试过,但这似乎是 Excel-Word 协调问题。根据我的 MS Office 耦合经验,我知道有很多替代方案,理论上应该没问题,但会引发错误。而是花时间寻找可行的替代方案(也许没有),为什么不解决问题(Excel-Word 通信)?您可以将 Word 值存储在临时变量中,并将此变量写入 Excel 单元格。

于 2013-06-13T08:39:11.213 回答