如何知道是C1或D1或其它？

Question

我从Ado导数据到EXCEL
导完后对某些列(动态，只知道是第几列）
我怎么知道这个列是ABCDEFG…中的哪个？
马上结贴

Answer 1

是不是这样：
1->A
2->B
3->C
....

Answer 2

Private Function getColName(ByVal numb As Long) As String
    If numb < 0 Or numb > 26 * 10 - 4 Then
        MsgBox "数值不在范围之内！"
        getColName=""
        Exit Function
    End If
    If numb > 26 Then
        Dim iTmp As Integer, bytTmp As Byte
        iTmp = Fix(numb / 26)
        bytTmp = numb Mod 26
        If bytTmp = 0 Then
            getColName = Chr(64 + iTmp) & "Z"
        Else
            getColName = Chr(64 + iTmp) & Chr(64 + bytTmp)
        End If
    Else
        getColName = Chr(64 + numb)
    End If
End Function
'调用：
Private Sub Command1_Click()
    MsgBox getColName(Val(Text1.Text))
End Sub

Answer 3

没有objSheet.Columns(i).Name这样的属性的？