Excel VBA循环通过字母表

Question

我目前有一个包含几列和多行的excel文件，每个单元格都包含信息。目前我的宏在循环中有一个循环来遍历每一行和每列。行的循环没有问题，我只是将数字增加1步，但是当涉及到列时，我已经创建了自己的子例程。此子例程将循环中的数字更改为字母并将该字母存储在变量中。

For firstloop = 3 To number

        For column = 1 To 3
            columnconvert
           'some code in here
         next
next

，这段代码是我做的新子程序：

Sub columnconvert()

    Select Case column

        Case "1"
            columnletter = "Q"
        Case "2"
            columnletter = "R"
        Case "3"
            columnletter = "S"
    End Select

    End Sub

我很想知道，是否有一种更简单的方式来＃CON; CONVERT＆＃34;循环号到一个字母？我可以用字母而不是数字来循环吗？