Artigos

Excel vba planilha gravador macro copiar range dinâmico para outra planilha Lição17

Licao_17 gm copiar range dinâmico para outra planilha

Neste exemplo de planilha vamos aprender como copiar um range dinâmico para outra folha de planilha para determinada célula. Range Name dinâmico expande com os preenchimentos, isto é, se você for preenchendo a lista que aparecerá suspensas, todos itens inseridos serão automaticamente mostrados na lista suspensa
'---- adquira nosso material didático na Promoçao:

Sub sbx_copiar_range_dinamico()
   wLin = Plan3.Range("A65000").End(xlUp).Row 'pode inserir no lugar de offset
   [sbx].Copy Plan3.Range("A65000").End(xlUp).Offset(1, 0)
   Plan3.Range("A65000").End(xlUp).Offset(1, 0).Value = " - - - - - - - - - - -'"
   Plan3.Range("A65000").End(xlUp).Offset(0, 2).Value = Format(Now(), "dd-mm-yyyy hh:mm:ss")
   MsgBox ("Dados Copiados com Sucesso para Planilha3"), vbInformation, "Saberexcel vba Estudos"
   Plan3.Select
   Plan3.Cells(wLin, "e").Select
End Sub

  Faça o download do exemplo da planilha lição 17
Licao_17 gm copiar range dinâmico para outra planilha