主题：[求助]限制大写字母问题

 ValidateEdit事件

If e.Col.name = "第二列" Then
    For Each c As String In e.text
        If Asc(c) > 90 OrElse Asc(c) < 65 Then
            msgbox("只能输入大写字母")
            e.Cancel = True
            Exit For
        End If
    Next
End If