Este fórum está sendo desativado

[AlanBC]

ola pessoal!!! sds...
encontrei o codigo abaixo na internet...
alguem pode ajustar o codigo de modo que o 6º carecter (XXX-1?11) da placa aceite digitação alfa-numerico???

Código: Selecionar todos

Private Sub txt_placa1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If Len(Me.txt_placa1.Value) < 3 Then
        If Not (KeyAscii >= 65 And KeyAscii <= 90 Or KeyAscii >= 97 And KeyAscii <= 122 Or KeyAscii = 8) Then
           KeyAscii = 0
        End If
    Else
        If Not (KeyAscii >= 48 And KeyAscii <= 57 Or KeyAscii = 8) Then
           KeyAscii = 0
        End If
    End If
    If Len(Me.txt_placa1.Value) = 4 Then
        Me.txt_placa1.Value = Mid(Me.txt_placa1, 1, 3) & "-" & Right(Me.txt_placa1.Value, 1)
    End If
End Sub

obrigado.
abraços.

[osvaldomp]

Olá, @AlanBC .

Sugestão: disponibilize o seu arquivo Excel com o Controle instalado e o respectivo código.

Me parece que você está tentando inserir código de placa Mercosul, é isso?

Se sim, após a terceira letra o padrão é um espaço, e não um hífen, como você colocou. Precisa do hífen?

[AlanBC]

Obrigado pelo contato @osvaldomp !
sim... é sobre placa mercosul, modelo atual;
acontece que eu ja tinha placa no modelo antigo com o hifen e sem o alfa-numerico para o 6° caraceter.
o q busco é fazer o 6° caraceter aceitar tmb letra e limitar a textbox em 8 caracteres.
anexo controle.
obrigado.

[osvaldomp]

Olá, @AlanBC .

1. você pretende utilizar só para placa Mercosul ou pretende utilizar também para placas não Mercosul ?

2. você não definiu se quer continuar com hífen, que está fora do padrão Mercosul, ou se quer o espaço, de acordo com o padrão ?

3. a TextBox aceita e cadastra letras minúsculas, o que está fora dos padrões Mercosul e não Mercosul; você quer consertar isso também ?

[AlanBC]

ola...
pretendo usar para os 2 modelos( nao Mercosul e Mercosul ), com o 6º caracter aceitando letra ou numero;
deixar com o hífen e letras minúsculas msm!
obrigado.
abraço

[osvaldomp]

Olá, @AlanBC .

Veja o arquivo anexado se atende.

[AlanBC]

opaaa.... obrigado @osvaldomp
muito boa a solucao sim!!!! mas nem precisava ser tao trabalhada... rsrs. como tinha dito, so precisava de fazer o 6º (xxx-1?11) caracter (?) aceitar tmb letra... ja uso em meu arquivo esse modelo de placa mas agora como entrou a letra no 6° caracter tinha q aceitar tmb.
mas vlw. agradeço.
abraços

[osvaldomp]

Salve, @AlanBC .

Como os tópicos dos fóruns ficam disponíveis nas buscas da WEB então eu fiz um modelito que poderá no futuro servir para quem busca um exemplo mais completo, que cubra os dois tipos de placas e com maiúsculas, que obedecem aos padrões.

[AlanBC]

grande @osvaldomp ...
perfeito!
obrigado... forte abraço!