Excel Erro na Execução de uma Macro Excel

magnosalmeida · 8 de junho de 2021

Ao executar a macro abaixo, dá um erro com nome de "erro de compilação. era esperado end sub."

A macro:

Private Sub Worksheet_Activate()

ActiveWorkbook.RefreshAll

End Select
End Sub

O objetivo da macro é atualizar todas as planilhas do arquivo ao executar.

Edson Luiz Branco · 9 de junho de 2021

Há duas linhas sobrando aí, @magnosalmeida.

A que está End Select pode eliminar sem preocupação.

Agora, entre a linha que está em amarelo (Sub AtualizarTodaPlanilha()) e a da linha seguinte (Private Sub Worksheet_Activate()) qual delas está sobrando depende de onde ela está (se num módulo comum ou num módulo de planilha) e de qual a forma de você disparar a macro: a primeira é disparada por você, seja através de algum botão ou de atalho de teclado ou via menu. A segunda é disparada quando uma determinada planilha (a que contém o código) é Ativada.

magnosalmeida · 9 de junho de 2021

@Edson Luiz Branco Obrigado por responder. Retirei a linha "end select" mas a macro ainda não funciona
Eu preciso de uma macro que, ao executar um comando, ela atualize todas as planilhas do arquivo.

Consegue me ajudar nisso?

Edson Luiz Branco · 9 de junho de 2021

Tirou a outra linha também?

Anexe o arquivo, fica mais simples de lhe ajudar, @magnosalmeida

magnosalmeida · 9 de junho de 2021

@Edson Luiz Branco O site não permite anexar, subi no link: https://we.tl/t-jNa3Oskn9J

Só lembrando: a macro precisa atualizar todas as planilhas (as guias BDReal e BD Limite geram a BDConsolidado, que por sua vez alimenta da tabela dinâmica e gráficos das guias PorDTEmissao e PorDTPgto). Não sei se tem a ver com algum erro da macro mas, às vezes, só atualiza quando eu fecho e abro o arquivo novamente.

Obrigado pela disposição em me ajudar, Edson!