Planilha Excel VBA TextBox limita numero impede letras Estes procedimento e Função Personalizada do Aplicativo Microsoft Excel VBA(Visual Basic Application), impede a
digitação de textos e limita números em (4 quatro digitos).
‘//===========’
Function ChaveOK(Codigo)
ChaveOK = IIf(InStr(“-1234567890”, Chr(Codigo)), Codigo, 0): Label2.Caption = “Escola Saberexcel VBA Estudos®”: If ChaveOK = 0 Then Label2.Caption = “Somente números”: Beep
End Function
‘//===========’
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
KeyAscii = ChaveOK(KeyAscii)
TextBox1.MaxLength = 4
End Sub
‘//===========’
Private Sub CommandButton1_Click()
Unload Me
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos
Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.
Baixe o exemplo de planilha contendo os macros acima:
Planilha Excel VBA textbox limita numero impede letras
