2012-10-11 136 views
0

這讓我瘋狂。Excel VBA:給定工作簿參考複製/粘貼一行

我有一個工作簿/片,我通過xlWBk.Sheets指(1)

我想基本上做到以下幾點:

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

是否有一個快速/乾淨的方式來做到這一點?我已經嘗試了很多行/範圍粘貼命令的組合,並且它不粘貼任何東西。

回答

1

是的,試試這個:

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

這將整行復制的6〜7行

編輯

感謝nutsch,我忘了量化糊書/表中的答案。很棒!上述代碼已更新。

+0

不幸的是,這仍然無法正常工作 - 粘貼行仍然是空的 – IAmBatman

+0

糟糕!對不起,請參閱編輯。 – danielpiestrak

+0

仍然不能正常工作:(事情要粘貼的行只是完全空白,並且確實存在第6行中的數據以複製 – IAmBatman

相關問題