Duvida no Excel (Limitar Caracteres)

Binhobr · 23 de novembro de 2011

Bom dia pessoal, to com um problema no excel, queria saber como delimita caracteres no excel, tipo 3 por célula, nem que de para digita 10 caracteres e quando der enter aparece que só pode ser 3...

um exemplo claro, mas preciso saber como limita os caracteres

vlwwwww

Patropi · 23 de novembro de 2011

Boa tarde BinhoBr

você pode fazer isso através de validação de dados ---> Personalizado utilizando a fórmula =NÚM.CARACT(A1)=3

Substitua a célula A1 pela célula da tua planilha.

Um abraço.

Binhobr · 24 de novembro de 2011

Boa tarde BinhoBr
você pode fazer isso através de validação de dados ---> Personalizado utilizando a fórmula =NÚM.CARACT(A1)=3

Substitua a célula A1 pela célula da tua planilha.

Um abraço.

Boa noite amigo

realmente assim da certo mas eu falei errado...

eu quero que quando for 3 o limite maximo se eu tentar digitar mais de erro, tipo no maximo 3 e nada mais, igual em sites que tem os limites de cpf e tal

encontrei esse macro no forum mas nao entendo nada disso, criei ele mas ele da erro quando digito mais e nao para até da enter...

segue o macro, no topico o cara falou q deu certo mas nao consegui...

Sub Macro1()

Range("A2").Select

With Selection.Validation

.Delete

.Add Type:=xlValidateTextLength, AlertStyle:=xlValidAlertStop, _

Operator:=xlBetween, Formula1:="1", Formula2:="10"

.IgnoreBlank = True

.InCellDropdown = True

.InputTitle = ""

.ErrorTitle = ""

.InputMessage = ""

.ErrorMessage = "Limite de 10 caracteres."

.ShowInput = True

.ShowError = True

End With

End Sub

colei exatamente assim, tem q alterar algo? no caso do 1 seria o inicio dos caracteres e 10 o limite, mas posso digitar 20 q nao da nada só depois do enter reporta erro, tem jeito? abrass

zinhovba · 24 de novembro de 2011

Boa noite!!!

Tente uma adaptação..

Sub LimitarCaractere()
'Limita o número de cacteres na célula
If Len(ActiveCell) > 6 Then
     ActiveCell = Left(ActiveCell, 6)
    MsgBox "Limite de caracteres Ultrapassado na Célula: " _
    & ActiveCell, Address
End If
End Sub

Trafix · 24 de novembro de 2011

Boa noite, Binho !

Tentando contribuir...

Não precisa usar VBA para fazer o que você quer, faça o seguinte, selecione a coluna onde quer fazer o desejado, vá em MENU DADOS ---->>VALIDAÇÃO DE DADOS --->>CONFIGURAÇÕES --->>OPÇÃO PERMITIR ----->>>PERSONALIZADO --->>supondo que os números esteja na coluna C , coloque está formula na opção FORMULA =NÚM.CARACT($C$2:$C$13)=3, ao fazer isso vá na opção alerta de erro em titulo coloque " ERRO " em mensagem de erro coloque , "NÚMEROS ULTRAPASSADOS".ok

Tomara que você tenha entendido a explicação contida a cima, fiz o máximo possível para explicar como é o procedimento. Caso não consiga coloque uma planilha fictícia aqui no fórum para que possamos adapitar o que você quer .

Dê retorno,

Binhobr · 25 de novembro de 2011

Boa noite!!!

Tente uma adaptação..

Sub LimitarCaractere()
'Limita o número de cacteres na célula
If Len(ActiveCell) > 6 Then
     ActiveCell = Left(ActiveCell, 6)
    MsgBox "Limite de caracteres Ultrapassado na Célula: " _
    & ActiveCell, Address
End If
End Sub

Boa noite, fiz o que você passou mas não aconteceu nada, sou leigo em excel mas assim vou explicar como fiz essa macro aí...

fui DESENVOLVEDOR dae GRAVAR MACRO ATRIBUI UM NOME, aí no VIRTUAL BASIC colei o que você mandou e lá em cima fui em executar, depois voltei pra planilha pelo um ícone verde do excel que tem no canto esquerdo e fui em MACROS e em executar novamente, mas sem nenhuma ação... obrigado pela ajuda!!!

Boa noite, Binho !
Tentando contribuir...

Não precisa usar VBA para fazer o que você quer, faça o seguinte, selecione a coluna onde quer fazer o desejado, vá em MENU DADOS ---->>VALIDAÇÃO DE DADOS --->>CONFIGURAÇÕES --->>OPÇÃO PERMITIR ----->>>PERSONALIZADO --->>supondo que os números esteja na coluna C , coloque está formula na opção FORMULA =NÚM.CARACT($C$2:$C$13)=3, ao fazer isso vá na opção alerta de erro em titulo coloque " ERRO " em mensagem de erro coloque , "NÚMEROS ULTRAPASSADOS".ok

Tomara que você tenha entendido a explicação contida a cima, fiz o máximo possível para explicar como é o procedimento. Caso não consiga coloque uma planilha fictícia aqui no fórum para que possamos adapitar o que você quer .

Dê retorno,

Boa noite amigo

assim da certo, mas como expliquei antes ele só limita depois do enter, e precisava limitar na hora de digitar, por exemplo se preciso de 3 caracteres se tento digitar mais caracteres da erro automático. Assim só da erro se clicar em outra célula ou dar enter. Obrigado desde já.