Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Como criar uma macr...
 
Notifications
Clear all

Como criar uma macro que identifica célula.

 
2024 - VBA & Macros
Post Recente por Celso 12 anos atrás
6 Posts
3 Usuários
0 Reactions
1,309 Visualizações
RSS
 Celso
(@celso)
Posts: 3
New Member
Topic starter
 

Boa tarde amigos!
Eu tenho uma planilha que preciso que a macro execute o seguinte:

Pegue o valor que esta na célula "AJ2", exemplo o numero 1
Se nesta célula estiver o numero 1 a macro vai copiar tudo que estiver na coluna "BU" a partir da linha 13 e colar na coluna "D" a partir da linha 3, a Macro terá que identificar o valor da "AJ2", por que se for 2 fara a mesma função mas colará na coluna "E", e assim por diante até atingir o numero 31, coluna a ser colada seria a "AH".

Espero ter explicado bem para poderem me ajudar, no aguardo!

 
Postado : 05/04/2013 9:23 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Já tentou com o Gravador de Macros??

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/04/2013 9:37 am
 Alminen
(@alminen)
Posts: 77
Trusted Member
 

Desenvolvi o código a seguir com base no que entendi. Veja se atende!

Sub Preenche()
Dim ncol As Long
Dim ulinha As Long
Dim acell As Range

Set acell = ActiveCell 'Grava a célula ativa
ncol = Range("AJ2").Value 'Capta o valor que determinará a coluna

awh = Range("BU" & Rows.Count).End(xlUp).Row 'Identifica a última linha que contém dados na coluna BU
Range("BU13:BU" & awh).Copy 'Copia os dados de BU13 até a última linha que contém dados na coluna BU

Range("D3").Offset(0, ncol - 1).Activate 'Ativa a célula que receberá os dados copiados
ActiveSheet.Paste 'Cola os dados

acell.Activate 'Retorna à celula gravada, para que esta não mude.
End Sub
 
Postado : 05/04/2013 9:42 am
 Celso
(@celso)
Posts: 3
New Member
Topic starter
 

Boa tarde!

Obrigado Alminen,

Foi exatamente o que eu precisava....
Obrigado mesmo!

Aproveitando a oportunidade, como faço para aprender os códigos VBA para que eu mesmo possa estar realizando?

 
Postado : 05/04/2013 10:40 am
 Alminen
(@alminen)
Posts: 77
Trusted Member
 

Disponha!
Muito do que eu aprendi foi vendo códigos prontos. Dois sites que gosto muito são o VBAExpress.com e o Ozgrid.com (ambos em inglês). Aprendo muito com os fóruns - inclusive aqui, que tem muita gente boa de VBA!

 
Postado : 05/04/2013 10:48 am
 Celso
(@celso)
Posts: 3
New Member
Topic starter
 

Bom saber, vou pesquisar, gostei muito sintaxe não ficou complexa e atendeu minhas precisões...
Valeu mesmo...fui!

 
Postado : 05/04/2013 10:58 am
Forum Jump:
  Tópico Anterior
Próximo Tópico