Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Apagar primeiro dad...
 
Notifications
Clear all

Apagar primeiro dado lançado em determinada coluna

 
2024 - VBA & Macros
Post Recente por MarcioFSA 9 anos atrás
9 Posts
4 Usuários
0 Reactions
1,744 Visualizações
RSS
 MarcioFSA
(@marciofsa)
Posts: 0
New Member
Topic starter
 

Boa tarde,

Estou começando em VBA e tenho uma dúvida. Pesquisei vários tópicos, tentei adaptações de código mais não consegui o que queria. O código ( .Cells(Rows.Count, "A").End(xlUp).clearcontent), pega o ultimo dado preenchido na coluna A e apaga, e assim vai subindo linha a linha na medida que o código é executado certo?

O que quero é o inverso. Que ele pegue o primeiro dado e desça apagando linha a linha na medida que o código for executado. É possivel?.

Desde já agradeço

 
Postado : 07/10/2015 9:08 am
 MPrudencio
(@mprudencio)
Posts: 0
New Member
 

E so selecionar a primeira linha da tabela que se deseja apagar e deletar

 
Postado : 07/10/2015 9:40 am
 MarcioFSA
(@marciofsa)
Posts: 0
New Member
Topic starter
 

E so selecionar a primeira linha da tabela que se deseja apagar e deletar

Beleza. Mais em código VBA como ficaria?

 
Postado : 07/10/2015 10:02 am
 Duvidoso
(@duvidoso)
Posts: 0
New Member
 

Onde os dados iniciam? Por exemplo
Linha |Nome
1. |Marcio
2. |FSA
3. |Forum
4. |Plan

No caso os dados começam na linha 1 em ordem inversa na linha 4, onde seus dados nessa planilha começam, se quiser pode me passar uma com um exemplo seu descrevendo o que quer

 
Postado : 07/10/2015 11:48 am
 messiasmbm
(@messiasmbm)
Posts: 0
New Member
 

troque .End(xlUp) por .End(xlDown)

 
Postado : 07/10/2015 12:13 pm
 MarcioFSA
(@marciofsa)
Posts: 0
New Member
Topic starter
 

Onde os dados iniciam? Por exemplo
Linha |Nome
1. |Marcio
2. |FSA
3. |Forum
4. |Plan

No caso os dados começam na linha 1 em ordem inversa na linha 4, onde seus dados nessa planilha começam, se quiser pode me passar uma com um exemplo seu descrevendo o que quer

Vou anexar um exemplo resumido.

troque .End(xlUp) por .End(xlDown)

Já tentei e nada acontece. Deve ser um erro bobo mais não encontrei de jeito nenhum.. :D

 
Postado : 07/10/2015 12:19 pm
 Duvidoso
(@duvidoso)
Posts: 0
New Member
 

Como o amigo citou sobre trocar, la vai um exemplo

 
Postado : 07/10/2015 12:20 pm
 Duvidoso
(@duvidoso)
Posts: 0
New Member
 

Se precisar de mais explicação avisa, ou ajuda

 
Postado : 07/10/2015 12:24 pm
 MarcioFSA
(@marciofsa)
Posts: 0
New Member
Topic starter
 

Se precisar de mais explicação avisa, ou ajuda

Muito Obrigado.

Valeu Mesmo.

Grande Abraço!!

 
Postado : 07/10/2015 12:27 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico