VBA; Preencha a última linha de uma matriz para corresponder ao comprimento de uma coluna adjacente

1

Então, para uma primeira tentativa no VBA, estou escrevendo uma macro:

  1. estou colando em um conjunto de dados que aumenta em números de linhas a cada mês; os dados estão bem organizados sem valores / colunas em branco
  2. Eu tenho fórmulas nas colunas A-L e meus dados são soltos em colunas L-em diante
  3. Desejo atualizar fórmulas / colunas em A-L para preencher para corresponder ao último valor na coluna M

Lutando por isso, se você é capaz de ajudar com uma explicação que seria muito apreciada. Eu sei que envolveu selecionar a última linha no A: L - Eu tenho isso, mas eu não posso descobrir como preencher corretamente uma coluna de comprimento variável M a cada vez.

Sub Macro6()
'
' Macro6 Macro
'

'
    Range("M1").Select
    Range(Selection, Selection.End(xlDown)).Select
    ActiveCell.Offset(0, -1).Select
    Range(Selection, Selection.End(xlToLeft)).Select
    Range(Selection, Selection.End(xlUp)).Select
    Selection.FillDown
End Sub
    
por Uncle Boz 16.06.2015 / 16:21

1 resposta

0

Claro que você pode usar o snippet superior ( lrow ) para obter a linha inferior e usá-la em seus outros métodos

Sub test()
Dim lrow As Integer
lrow = Cells(Rows.Count, "M").End(xlUp).row
 Range("A1:A" & lrow).FillDown
 Range("B1:B" & lrow).FillDown
End Sub
    
por 16.06.2015 / 17:26