Notifications
Clear all

Criar macro - seleção de dados da coluna

4 Posts
4 Usuários
0 Reactions
708 Visualizações
(@murillo)
Posts: 0
New Member
Topic starter
 

Boa tarde galera, sou novo no fórum e gostaria de uma ajuda de vcs:
Estou gravando uma macro e tenho que selecionar todos os valores da minha coluna exceto a 1ª linha, que possui o nome "DATA", porém nem todos as linhas estão preenchidas, então quando aplico o comando Ctrl+Shift+baixo, a seleção para no ultimo dado preenchido, e existem mais dados a serem selecionados, como aplico esse comando sem ter que selecionar ate a última linha do Excel?

OBS.: Essa coluna é de um banco de dados, ou seja, à medida que meu banco de dados cresce,a seleção dos dados feita pela macro também deve incluir esses novos dados.

 
Postado : 03/04/2017 9:51 am
(@skulden)
Posts: 0
New Member
 

Formate o banco de dados como tabela e selecione a coluna da tabela, ele entenderá que sempre será a coluna toda.

Abraços.

 
Postado : 03/04/2017 10:06 am
(@leandroxtr)
Posts: 0
New Member
 

Poste um exemplo de planilha para ajudarmos melhor.

 
Postado : 03/04/2017 10:35 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

Murillo,

Boa tarde!

Nesse caso, com o gravador de macros, sua macro vai sempre falhar e não vai pegar novas linhas que forem adicionadas as suas colunas pois ao gravar uma macro o gravador fixa a quantidade de linhas de acordo com o que "vê" lá gravado.

Você precisa incrementar, no seu código, uma rotina que leia os dados da coluna, da segunda linha até a última linha preenchida. Por exemplo, suponhamos que você queira verificar seus dados pela coluna C para descobrir até que linha está preenchida e selecionar até a última linha desta coluna (sendo que existem linhas, nessa coluna, que estão vazias, sem preenchimento. Primeiramente, voc^^e deve se certificar que tem sempre uma coluna que não há possibilidade da mesma ter qualquer linha em branco. Feito isso, você irá descobrir qual é a última linha com dados por essa coluna. Suponhamos que a sua coluna A está totalmente preenchida. Então, nesse caso, você utilizaria o seguinte código para descobrir qual é a última linha com dados (pela coluna A) e selecionar toda a coluna C:

Sub Teste
     Dim UltimaLinha As Long
     'Essa linha de comando descrobrirá qual é a última linha com dados pela coluna A     
     UltimaLinha  = Sheets("Plan1").Cells(Cells.Rows.Count,1).End(XlUp).Row 
     'Selecionando toda a coluna C, da linha 2 até a última linha
     Range("C2:C" & UltimaLinha).Select
End Sub
 
Postado : 03/04/2017 11:18 am