domingo, 10 de julho de 2011

EXCEL: Preenchimento de células

O Excel possibilita ao usuário a realização do preenchimento automático de sequencias numéricas, de datas, de dias e sequencias personalizadas (essa última veremos posteriormente).
Para criarmos uma sequência devemos seguir os seguintes passos:

    1. Digitar o número inicial da sequência na primeira célula
    2. Efetuar um duplo clique sobre o ponto inferior direito da célula preenchido
    Obtendo o seguinte resultado:
    3. Selecionar "Preencher Série" teremos o resultado desejado:

Da mesma forma que fizemos com a sequência numérica, podemos fazer com os tipos citados no início do tópico.
Podemos obter o mesmo resultado mantendo a tecla CTRL pressionada e clicar no canto inferior direito e arrastar até obter a sequencia desejada:
 Obtendo o mesmo resultado:


Espero que tenha sido útil, qualquer dúvida ou sugestão de assunto a ser abordado mantenha contato pelos comentários.

Até a próxima...

sábado, 9 de julho de 2011

VBA: Encontrar a próxima célula vazia

Costumeiramente necessitamos localizar a próxima célula vazia em nossas planilhas, para inserirmos novos dados ou ainda para sabermos o tamanho do Range que teremos para trabalhar.

Sempre utilizei o código abaixo:

    Dim I As Integer
    
    I = 1
    Do While Range("A" & I).Value <> ""
        I = I + 1
    Loop

    Range("A" & I).Select


Porém descobri recentemente que basta utilizarmos o código abaixo para termos o mesmo resultado, poupando um pouco de processamento e bastante os dedos:

    'Localiza a próxima célula vazia
    Range("A1048576").End(xlUp).Offset(1, 0).Select

Análise do código:
  • Range("A1048576")à corresponde a última célula da coluna A
  • .End(xlUp)à localiza a próxima célula preenchida para cima (xlUp)
  • .Offset(1, 0)à significa que a seleção estará uma linha abaixo e na mesma coluna da célula selecionada.

Espero que tenha sido útil, qualquer dúvida ou sugestão de assunto a ser abordado mantenha contato pelos comentários.

Até a próxima...