Amigo existe n's formas de se fazer isso...

Tente gravar uma macro fazendo exatamente isso, e no módulo VBA vc já vai ter um norte de como fazer..

Exemplo:
Abaixo ele pega a primeira célula da plan1 vai até a última coluna preenchida e até a ultima linha preenchida, copia e cola na plan2. Só um começo para abrir sua cabeça e pensar em como solucionar seu problema....rsrs

qualquer coisa grita ae!

Sub Macro1()
    Range("A1").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Sheets("Plan2").Select
    ActiveSheet.Paste
End Sub

Amigo existe n's formas de se fazer isso...

Tente gravar uma macro fazendo exatamente isso, e no módulo VBA vc já vai ter um norte de como fazer..

Exemplo:
Abaixo ele pega a primeira célula da plan1 vai até a última coluna preenchida e até a ultima linha preenchida, copia e cola na plan2. Só um começo para abrir sua cabeça e pensar em como solucionar seu problema....rsrs

qualquer coisa grita ae!

Sub Macro1()
    Range("A1").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Sheets("Plan2").Select
    ActiveSheet.Paste
End Sub

Boa noite amigo, tudo blz?

Entao, eu nao manjo muito de macros e se eu for tentar fazer uma assim, sera através do metodo basico de gravaçao.

Eu ja ate tentei faze-la, entretanto sempre empaco nas linhas a mais ou a menos que sao copiadas pq se fizer gravando para copiar de A1 ate A20, se tiver celula em branco ira copiar, ou se tiver celula preenchida de A21 em diante a macro nao ira copiar.

Infelizmente, nao conheço muito os comando/codigos para manipular no VBA;

Em A2 de Plan2 faça a seguinte matricial

{=SEERRO(INDIRETO("Plan1!"&ENDEREÇO(MENOR(SE(Plan1!$A$2:$A$1000<>"";LIN(Plan1!$A$2:$A$1000);"");LIN()-1);COL()));"")}

Arraste para baixo e para a direita.

Se não avançar avise.

Abs,

Em A2 de Plan2 faça a seguinte matricial

{=SEERRO(INDIRETO("Plan1!"&ENDEREÇO(MENOR(SE(Plan1!$A$2:$A$1000<>"";LIN(Plan1!$A$2:$A$1000);"");LIN()-1);COL()));"")}

Arraste para baixo e para a direita.

Se não avançar avise.

Abs,

Olá Mandrix!

Se eu quiser buscar os dados em celulas que ficarão escondidas na mesma ABA conforme arquivo em anexo, como eu altero a formula?

Tentei dar uma alterada, mas algumas formulas eu nao conheço.

Abraços,

Em A2 de Plan2 faça a seguinte matricial

{=SEERRO(INDIRETO("Plan1!"&ENDEREÇO(MENOR(SE(Plan1!$A$2:$A$1000<>"";LIN(Plan1!$A$2:$A$1000);"");LIN()-1);COL()));"")}

Arraste para baixo e para a direita.

Se não avançar avise.

Abs,

Olá Mandrix!

Se eu quiser buscar os dados em celulas que ficarão escondidas na mesma ABA conforme arquivo em anexo, como eu altero a formula?

Tentei dar uma alterada, mas algumas formulas eu nao conheço.

Abraços,

Olá!

Outro ponto é que quando "incluo" (colar celulas deslocando para baixo) na Plan1, a formula que esta em Plan2 esta se movimentado perdendo a referencia das celulas.

Como posso travar?