[已解决]求助！！！EXCEL VBA如何将纵向数据转换成横向数据

lht8747666

本人对vba 批量转换 不会用 求大神帮助下
我只会手动 把数据 纵向转横向     
不过本人的数据较多   不会批量转换求 大神帮助一下 在网上找了很多资料没弄会

最佳答案

月排行榜 / 总排行榜

baksy

2016-2-17 06:03

附件

跳转到最佳答案楼层

雪舞子

1. Sub test()
   
2.     Sheet2.Range("b1:i" & [b65536].End(3).Row).Copy             '复制源数据
   
3.     Sheets("(竖版)").Range("m1").PasteSpecial Transpose:=True '转置粘贴，m1目标左上角单元格
   
4. End Sub

复制代码

求助.rar (12.26 KB, 下载次数: 38)

2016-2-17 00:17 上传

点击文件名下载附件

baksy

附件

lht8747666

雪舞子 发表于 2016-2-17 00:17

不好意思哦 我没看懂代码
还有我自己在复制过去其他的数据 就不好用了
数据多了提示错误