Excel VBA – 在范围内增加列参考

如何在下面的代码中增加列引用？ 只是列参考，行值可以保持不变。

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 

但是，这会引发错误。

有什么build议么？

Answer 1

您可以使用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