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.
Sub CNPJFormat_LostFocus()Let CNPJFormat.Value = Format([Campo], "00"".""000"".""000""/""0000""-""00")End Sub
Referências:
Tags: VBA, Excel, CNPJ, Brasil, Brazil, format,
