Página 1 de 1

Cálculo manual

Enviado: 14 Dez 2015 às 09:54
por Victorzoomg1
Bom dia. Coloquei em uma aba das minhas planilhas uma macro para tornar o cálculo da mesma manual, nas outras abas coloquei o semi automático, para poder deixar somente uma como manual.
Funcionou, porém na hora de copiar algum dado e colar em outra célula dessas planilhas, a seleção sumia assim que saia da célula. Alguém sabe me dizer o porquê??
E se possível por favor me passe o código para tornar manual e automático de novo, pois tirei o código para poder usar a planilha.
Qualquer sugestão para fazer de uma fora diferente, mas como o resultado que eu preciso será bem vinda. Obrigado.
Obrigado.

Cálculo manual

Enviado: 14 Dez 2015 às 10:21
por Parkeless
Olá Victor!

Você consegue postar a planilha?

Código para manual/automático/semi:
Código: Selecionar todos
application.Calculation=xlCalculationManual
application.Calculation=xlCalculationAutomatic
application.Calculation=xlCalculationSemiautomatic

Re: Cálculo manual

Enviado: 14 Dez 2015 às 15:20
por Victorzoomg1
Estou deixando em anexo o modelo da planilha. Obrigado.

Cálculo manual

Enviado: 14 Dez 2015 às 15:32
por Parkeless
Victor,

O que você está tentando copiar, de onde para onde?

Quanto ao seu anexo, encontrei uns problemas com ele:

1. A planilha que você postou não tem nenhum dado; precisaríamos dela preenchida nem que fosse com dados fictícios (simulando um preenchimento real).

2. No seu post você comenta que tem várias abas; na que você anexou só tem uma...

3. No código, não existem as macros que você mencionou, de mudar a forma de calcular para automático/manual.

Pode postar um novo anexo por favor, em que possamos simular seu erro?

Re: Cálculo manual

Enviado: 18 Dez 2015 às 09:43
por Victorzoomg1
Desculpe. Acabei retirando tudo. Estou postando um modelo mais completo agora.

Cálculo manual

Enviado: 18 Dez 2015 às 11:25
por Parkeless
Victor,

Realmente, o Application.calculation faz com que o Excel perca o que foi copiado... não sabia disso kk

E se você deixar permanentemente como Manual e, nas abas que você quer que as fórmulas atualizem, colocar um evento Worksheet_Change com o código Application.Calculate?

Dessa forma, apesar de estar como xlmanual, a planilha vai atualizar sempre que você alterar algo naquela aba.

Não sei dizer se vai te atender, porque não sei se o application.calculate recalcula tudo, de todas as abas...