vba excel 语法问题 难度不大，请人帮忙写成语法格式

定义自变量，用途是用来定位选定的第一行和选定的未行的各一个。ha hb
赋值初始值为，ha=1 hb=ha+4
定义自变量，用途是用来选定行hc
赋值初始值为，hc=1
Range("hangc:hangm").Select
Selection.Copy
Sheets("Sheet5").Select
Range("hc").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
然后ha=ha+6 hb=ha+4 hc=hc+1
执行循环，循环5500次。

这个vba 的作用就是把表里的竖着排列的选择题 （五行）自动复制到表五里，并且转置横向粘贴。
我语法不会，请大神帮忙，要不5000多道题 ，我一个个复制，会累死的。

以上字母的第一行有个地方写错了，hangc 就是ha hangm 就是hb

你的代码中看不出选 择题有几列，ha=1 hb=5，Range("hangc:hangm").复制后在Sheets("Sheet5"). Range("hc")中转置粘贴会出现错误，

你的描述不清，选择题在哪里，以什么格式存放，要复制到表5里，覆盖还是依次放下去？

Range("hangc:hangm").Select Selection.Copy Sheets("Sheet5").Select Range("hc").Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True 一堆问题。。。。 hangc:hangm 这是什么区域？？？是C行到M行？？？

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息