Como sabem, sempre precisamos nos lembrar dos campos tão tipicamente brasileiros para o preenchimento de cadastros.
O CNPJ não foge a regra, sempre necessitamos preparar o campo que receberá o seu conteúdo.
Abaixo uma pequena SUB que força o preenchimento de acordo com a máscara desejada.
Function CNPJFormat() as StringLet CNPJFormat = Format([Campo], "00"".""000"".""000""/""0000""-""00")End Sub
Futuramente disponibilizo o modo de check quanto aos cálculos do mesmo, isso sim, muito mais interessantes.
Tags: VBA, Excel, CNPJ, format, máscara,
Certo amigo mais aonde como loco essa sub e como faço para ela funcionar?
ResponderExcluirCaro LucasBE, obrigado por deixar a sua dúvida.
ResponderExcluirBem, você pode colocar essa função dentro da célula do MS Excel, assim:
=CNPJFormat("26548725423"), e retornará:
265.487.254.-23