TEXT
Alguém poderia me ajudar, como eu faço para qndo eu digitar um numero dentro do campo codigo e ele jogar zeros, tipo assim, eu digito o numero 1 e dou enter ai fica 00001 obrigado
Dim ptamanho As Long
ptamanho = 5
Text1 = Right(String$(ptamanho, "0") & Text1, ptamanho)
ptamanho = 5
Text1 = Right(String$(ptamanho, "0") & Text1, ptamanho)
Tópico encerrado , respostas não são mais permitidas