0

这真让我抓狂。

我有一个通过 xlWBk.Sheets(1) 引用的工作簿/工作表

我想基本上做到以下几点:

xlWBk.Sheets(1).The sixth row.Copy Everything (text, format, etc)
xlWBk.Sheets(1).Arbitrary row.Paste Everything (text, format, etc)

有没有一种快速/干净的方法来做到这一点?我已经尝试了很多行/范围粘贴命令的组合,但它没有粘贴任何东西。

4

1 回答 1

1

是的,试试这个:

xlWBk.Sheets(1).Range("A6").EntireRow.Copy xlWBk.Sheets(1).Range("A7")

这会将整个 6 行复制到第 7 行。

编辑

谢谢胡说,我忘了量化答案中的粘贴书/表。伟大的收获!上面的代码更新了。

于 2012-10-11T18:08:03.287 回答