Find centralized, trusted content and collaborate around the technologies you use most.
Teams
Q&A for work
Connect and share knowledge within a single location that is structured and easy to search.
这真让我抓狂。
我有一个通过 xlWBk.Sheets(1) 引用的工作簿/工作表
我想基本上做到以下几点:
xlWBk.Sheets(1).The sixth row.Copy Everything (text, format, etc) xlWBk.Sheets(1).Arbitrary row.Paste Everything (text, format, etc)
有没有一种快速/干净的方法来做到这一点?我已经尝试了很多行/范围粘贴命令的组合,但它没有粘贴任何东西。
是的,试试这个:
xlWBk.Sheets(1).Range("A6").EntireRow.Copy xlWBk.Sheets(1).Range("A7")
这会将整个 6 行复制到第 7 行。
编辑
谢谢胡说,我忘了量化答案中的粘贴书/表。伟大的收获!上面的代码更新了。