2012-01-13 1155 views
9

我想要的东西很简单,但我似乎被卡住了。我正在关注PasteSpecial的帮助菜单,但我似乎无法让我的代码在没有错误的情况下正常工作。Excel VBA - Range.Copy转置粘贴

我想采取Worksheets("Sheet1").Range("A1","A5")并粘贴转置为Worksheets("Sheet2").Range("A1","E1")

完成此操作最简单的方法是什么?

+1

我只是想建议你[使用转置工作表方法,而不是滥用剪贴板](http://stackoverflow.com/a/13176360/429091)。 – binki 2015-06-30 19:15:39

回答

30
Worksheets("Sheet1").Range("A1:A5").Copy 
Worksheets("Sheet2").Range("A1").PasteSpecial Transpose:=True 
+0

谢谢,我没有把过去的特殊命令放在新的路线上。 – user1130306 2012-01-13 16:03:28

+0

我必须将转置粘贴到一组不同的单元格。所以,如果从A1:B5复制,不得不过去到A6 – 2017-03-18 22:03:35