Notifications
Clear all

Arrastar formulas por vba

2 Posts
1 Usuários
0 Reactions
2,987 Visualizações
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...

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

 
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

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

 
Postado : 02/08/2012 4:54 am