首页 > 教學 > excel vba > Excel Vba 英文字母轉換成數字
2011
11-18

Excel Vba 英文字母轉換成數字

Excel Vba 英文字母轉換成數字 - 第1张  | 彰化一整天blog

Private Sub CommandButton1_Click()
    For i = 1 To 26
        t = Chr(64 + i)
        Cells(i, 1) = t
        n = Asc(t) - 64
        If n <= 9 Then
           s = n
        ElseIf n <= 18 Then
           s = n - 9
        Else
           s = n - 17
        End If
        Cells(i, 2) = s
    Next
End Sub
同步發表於:Excel Vba 英文字母轉換成數字
最后编辑:
作者:明和 蔡
这个作者貌似有点懒,什么都没有留下。

留下一个回复

你的email不会被公开。