如何在下面的代码中增加列引用?只是列ref,行值可以保持不变。
Range("w3:w54").PasteSpecial
我希望我能做到这样的事情:
For i = 23 to 27
'start at column w (which is number 23)
Range(Columns(i)+"3":Columns(i)+"54").PasteSpecial
Next
但是这会引发错误。
有什么建议吗?
答案 0 :(得分:3)
您可以使用Cells(Row, Column)
,因此您可以使用数值轻松增加Column
部分,而无需使用从数字到字母顺序的转换功能。
For i = 23 To 27
'start at column w (which is number 23)
Range(Cells(3, i), Cells(24, i)).PasteSpecial
Next