Excel Curitiba

Olá Nosso próximo post terá como assunto matrizes, que são essenciais para se fazer uma planilha automatizada funcionar bem. As matrizes servem para armazenar dados temporariamente para efetuarmos vários processamentos necessários no dia a dia de um escritório com várias rotinas de tratativas de relatórios em excel, ou mesmo quando manipulamos muitos dados. Não percam!!!!!!!!!!!!!!!

Olá Este código incrementa um laço for e coloca dentro dele a funcionalidade de transformar o conteúdo de cada célula em maiúsculo. Não podemos esquecer que quando queremos comparar dois valores é muito importante que os valores tenham o mesmo formato, não posso comparar minúscula com maiúscula ou vice-versa. Portanto segue um código bem interessante. Sub maiuscula() '  Dim a, b As Integer  Dim c As String  For a = 1 To 10 '10 é o número de colunas que você quer percorrer    For b = 1 To 2000 '2000 é o numero de linhas que você quer percorrer     c = Cells(a, b).Value ' c=variável que armazena o valor da célula     'b e c são respectivamente o endereço da célula, b=coluna e c=linha      If c <> "" Then 'se valor de a for diferente de vazio        c = UCase(c) ' o ucase converte em maiúscula     End If    Next  Next End Sub

Não raro, temos a necessidade de varrer uma planilha em busca de alguma informação ou mesmo pra preencher alguma matriz. Nesse código você pode conferir um pequeno exemplo: Como varrer um intervalo em uma planilha Sub varreintervalo() '  Dim a, b As Integer   For a = 1 To 10 '10 é o número de colunas que você quer percorrer    For b = 1 To 2000 '2000 é o numero de linhas que você quer percorrer    'aqui você coloca o que quer que o laço execute, seja um contador ou qualquer coisa    Next  Next End Sub

No desenvolvimento de macros que geralmente precisamos limpar a área de transferência para que não apareça uma chata mensagem de que "Você deseja manter os dados da área de transferência?", penei por um bom tempo para encontrar um código que não precisasse clicar em nenhum botão para seguir com a rotina. Então encontrei este pequeno fragmento que ajudou em muito. Vamos a ele: Application.CutCopyMode = False Basta inserí-lo no seu código que não aparecerá mais a inconveniente janela para ficar clicando.