Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Arrastar formulas p...
 
Notifications
Clear all

Arrastar formulas por vba

 
2024 - VBA & Macros
2 Posts
1 Usuários
0 Reactions
2,972 Visualizações
RSS
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Ola, tenho dados nas colunas A2:J que importa valores de outra base de dados estes tem uma quantidade de informações variadas as vezes muitas linhas outras bem poucas.
Nas colunas de K2:N2 tem algumas formulas para filtrar estes valores, para não carregar a planilha com estas formulas por uma quantidade de linhas que talvez não seje necessário utilizar, gostaria de arrastar estas formulas somente até a ultima linha da coluna J.
Seria possível uma função nestes termos, desde já agradeço...

 
Postado : 31/07/2012 6:08 pm
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia!!

Tente isso e veja se vai dar certo.

Sub ArrastarAleVBA()
    Dim LastRow As Long
     With ActiveSheet
        LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
        .Range("K2:N2").AutoFill .Range("K2:N2").Resize(LastRow)
    End With
End Sub
 
Postado : 02/08/2012 4:54 am
Forum Jump:
  Tópico Anterior
Próximo Tópico