exc3l.blogspot.com

Olá pessoal, voltamos !

Na nossa última video aula, falei bastante sobre a importancia de ter um
banco de dadosem ordem, sem aqueles espaços no final dos nomes
e tudo mais.

Pensando nisto, elaborei uma macro simples para fazer os s
eguintes ajustes;

A primeira, é tirar os espaços
A segunda, deixar a primeira letra maiúscula
.


Parece que não mas seu banco fica em ordem e visualmente mais bonito.


Vamos começar !

A video aula está a caminho, aguadem.

Enquanto isso, vamos as macros;

Aonde eu encontro a macro no excel
Simples, tá com Excel aberto, então aperte as teclas ALT + F11, uma janel assim vai aparecer !

Faça o seguinte;

Com o mouse posicionada na janela VBAProject, logo a esqueda,
clique com o botão direito em cima de Plan1 > Inserir > Módulo

-----------------------------------------------------------------------------------------------------------
Sub Ajustando_BD()
 
    CI = InputBox("Informe a coluna Incial ( Letra )", "Atenção!") 
    CF = InputBox("Informe a coluna Final ( Letra )", "Atenção!")
    Ultima = Range(CI & "65000").End(xlUp).Row
   
     For Each cel In Range(CI & "5:" & CF & ultima)
 
         cel.Value = Trim(StrConv(cel, vbProperCase))
 
     Next cel
                   
End Sub
‘-------------------------------------------------------------------------------------------------------------

Sintaxe
Vou tentar detalhar um pouco de como tudo isso funciona !
Pra quem não conhece macro, é a primeira vez que vai mexer isso, assista a video aula ( Breve ).
Se você já conhece um pouco de macro;

Bom eu deixei as variáveis, em negrito. onde;

CI – é o nossa Coluna Inicial , ou seja, o banco de dados ( o seu ) começa em qual coluna ?
CF – é a nossa Coluna Final, aonde termina o banco de dados.

Ultima
– é a última linha preenchida do banco de dados.
Atenção, muita atenção: Este campo tem um número de linhas que você pode mudar, de acordo com o seu Excel. Aqui deu deixei 65000, porque este exemplo é serve para o excel 2003/97. Mas você pode mudar para a versão mais recente 1048576. Detalhe:  não siguinifica que a formatação vai até esta linha, e sim, da onde ele começa para achar a última linha do preenchida do seu banco de dados.

Cel – Esta variável, funciona de acordo com o For ( Repetição ). Está melhor explicado na video aula.

Pra fechar

Trim(StrConv ( Cel, vbProperCase ))

Trim – Tira os espaços
StrConv – Função que trabalha em conjunto com a vbProperCase

Pra resumir esta função
ela pega o valor da Cel e com a função VbProperCase deixa a primeira letra em maiúsculo.

Você também pode usar os seguintes comandos, basta tirar o VbProperCase e colocar;

vbUpperCase – Para deixar todas as letras maiúsculas.
vbLowerCase -  Para deixar todas as letras minúsculas

De momento é isso, na video aula está melhor explicado, qualquer dúvida, use o nosso formulário logo ao lado e entre em contato conosco!

Até a próxima