Dúvida - textbox exige que texto contenha no minimo 2 caracteres em VBA Excel

[GOMES Tatuí]

BOM DIA

Estou com uma dúvida e necessito de ajuda, como faço para que o textbox exija que a palavra digitada contenha no minimo 2 caracteres.

ex: Se eu digitar somente "J", uma mensagem apareça dizendo que a caixa somente aceitara palavra com minimo de 2 caracteres.

Aguardo ajuda.

attn.

[Márcio Rodrigues]

Olá GOMES Tatuí

Tente usar este código:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

If Len(TextBox1.Text) < 2 Then

MsgBox "Tem que ter mais que 1 caracter!!!"

Cancel = True

TextBox1.SelStart = 0

TextBox1.SelLength = TextBox1.TextLength

Else: End If

End Sub

[GOMES Tatuí]

Olá Márcio Rodrigues.

Testei o código que você especificou e funcionou perfeitamente.

Obrigado .

[Patropi]

Caso o autor do tópico necessite, o mesmo será reaberto, para isso deverá entrar em contato com a moderação solicitando o desbloqueio.