vba - Excel VBA 在列上循环

Question

当我们要在行中进行循环时，我们可以使用如下代码:

i = 1
Do
   Range("E" & i & ":D" & i).Select
   i = i + 1
Loop Until i > 10

但是如果我们想在列上进行循环怎么办？

我们可以用上面同样的方法吗？

而Excel中的列是一个复合体，例如A、B、C、...、Y、Z、AA、AB、AC、...等。从“Z”到“AA”的循环之间会出现问题。

我们如何从“A”到“Z”循环字母列，然后继续到“AA”、“AB”等

有什么可以帮忙的吗？

Answer 1

是的，我们以Select为例

示例代码:Columns("A").select

如何循环遍历列:

方法一:(可以用索引代替Excel地址)

For i = 1 to 100
    Columns(i).Select
next i

方法2:(使用地址)

For i = 1 To 100
 Columns(Columns(i).Address).Select
Next i

编辑:剥离 OP 列

columnString = Replace(Split(Columns(27).Address, ":")(0), "$", "")

例如你想要得到第27列 --> AA，你可以这样得到