no seu código possui alguma condicional?

if . .. .

Poderia ver seu código?

no seu código possui alguma condicional?

if . .. .

Poderia ver seu código?

Arruda. Segue a parte na qual esta dando o load.

w.Select
Worksheets("AVC").Range("e2:e1048576").Copy Destination:=w2.Range("g2")

w.Select
Worksheets("AVC").Range("f2:f1048576").Copy Destination:=w2.Range("i2")

olá, bom dia tudo bem com você?

tente diminuir o seu intervalo de células.

exemplo: coloque até f8756.

olá, bom dia tudo bem com você?

tente diminuir o seu intervalo de células.

exemplo: coloque até f8756.

Boa tarde.

Mesmo reduzindo o numero de celulas, continua lento.

Demora uns 9 segundos pelo menos pra macro copiar o valor de uma aba para outra.

pode ser muitas coisas.

Uma delas por exemplo pode ser alguma formatação condicional conflitante na sua planilha.
Ou Formatações de células sem necessidade..

De qualquer forma, poste seu código completo, ou melhor ainda, poste sua planilha para nós mesmos tertarmos.

Todavia tente:

Sub Copiar()
Dim ul As Long
ul = Sheets("AVC").Range("E" & Rows.Count).End(xlUp).Row
Application.ScreenUpdating = False
w.Range("G2:G" & ul).Value = Sheets("AVC").Range("E2:E" & ul).Value
w.Range("I2:I" & ul).Value = Sheets("AVC").Range("F2:F" & ul).Value
Application.ScreenUpdating = True
End Sub

pode ser muitas coisas.

Uma delas por exemplo pode ser alguma formatação condicional conflitante na sua planilha.
Ou Formatações de células sem necessidade..

De qualquer forma, poste seu código completo, ou melhor ainda, poste sua planilha para nós mesmos tertarmos.

Todavia tente:

Sub Copiar()
Dim ul As Long
ul = Sheets("AVC").Range("E" & Rows.Count).End(xlUp).Row
Application.ScreenUpdating = False
w.Range("G2:G" & ul).Value = Sheets("AVC").Range("E2:E" & ul).Value
w.Range("I2:I" & ul).Value = Sheets("AVC").Range("F2:F" & ul).Value
Application.ScreenUpdating = True
End Sub

Nao é possivel add a planilha mesmo zipada, devido ao tamanho do arquivo.

Posta no GoogleDrive e compartilha o link...

Posta no GoogleDrive e compartilha o link...

Segue o link.

https://drive.google.com/file/d/1L2DXqP ... sp=sharing

Amigo aqui funcionou perfeitamente.

Mas, o que exatamente seria "Load" para você?

Se com "Load" você quer dizer aquele "circulo" rodando enquanto a macro é executada, isso é normal.

O que o screenupdating = false faz é apenas desligar as atualizações de tela durante a macro. mas esse circulo não some mesmo. Ele ficará durante toda a execução da macro.

Amigo aqui funcionou perfeitamente.

Mas, o que exatamente seria "Load" para você?

Se com "Load" você quer dizer aquele "circulo" rodando enquanto a macro é executada, isso é normal.

O que o screenupdating = false faz é apenas desligar as atualizações de tela durante a macro. mas esse circulo não some mesmo. Ele ficará durante toda a execução da macro.

Isso mesmo.

A macro funciona normalmente, porem demora para ser executada. Tenho visto algumas macros serem executadas em bem menos tempo com o mesmo numero de dados e codigos ate maiores. Ai me faz pensar que meu codigo possa ter algo que atrase a execucao da macro.

Amigo aqui funcionou perfeitamente.

Mas, o que exatamente seria "Load" para você?

Se com "Load" você quer dizer aquele "circulo" rodando enquanto a macro é executada, isso é normal.

O que o screenupdating = false faz é apenas desligar as atualizações de tela durante a macro. mas esse circulo não some mesmo. Ele ficará durante toda a execução da macro.

Isso mesmo.

A macro funciona normalmente, porem demora para ser executada. Tenho visto algumas macros serem executadas em bem menos tempo com o mesmo numero de dados e codigos ate maiores. Ai me faz pensar que meu codigo possa ter algo que atrase a execucao da macro.

A demora é somente na hora de copiar e colar a receita, ja o CNPJ copia e cola quase que instantaneamente. Ate tentei mudar o formato das celulas da coluna receita pra ver se resolvia, mas deu em nada.