实现表格转置三法（分享）---不止三法,后面有补充

tanhong

小妖版主曾笑过我用大炮打蚊子，因为用函数能解决的我却用VBA来做了，哈哈！不过我这人有个怪毛病总喜欢追本逐源，多问几个为什么，这才有了下面的关于转置三法的出炉，就当再打一次蚊子吧，哈哈！人们不是说技不压身嘛，多了解和掌握几项技术，总不会是坏事吧，好了，不多啰嗦了。

方法一：操作技巧
1、选要转置的表格区域，点鼠标右键，选择复制

2、选择转置后表格第一个单元格后，点击编辑菜单，点选择粘帖


3、选择性粘贴对话框中点选转置，点确定。



方法二：转置函数
TRANSPOSE，格式=TRANSPOSE(array)
1、输入函数后，选择要转置区域
2、选择预转置后表格区域
3、点击编辑栏
4、关键一步，按住Ctrl+Shift+Enter(回车)


方法三：VBA方法
Sub 转置()
        Sheet1.Range("A11:H13") = Application.Transpose(Sheet1.Range("B2：D9"))
End Sub

实例样本：

[ 本帖最后由 pureshadow 于 2008-7-4 12:21 编辑 ]

c68678

相当给力

opelwang

学习了．

米果果

学习

momo260

刚来报道的,就在这里学了第一手.哈哈

h187175852

江哥好帅

catty_zhou

要学VBA,不会就是残废!

冬冬1

小妖与您都是高手我太敬佩您俩位了！太高了！

冬冬1

江羽叔叔，你的思路可真广，前两个试例用过，可是我一碰到VBA就晕，里面的语句我不太懂。你是怎么学习VBA语句的啊？[:44]

friendship

函数通用话，vba专业化，定制化。