Este fórum está sendo desativado

[LeoHenrique]

Bom dia a todos !

Caros, estou tentando fechar uma outra planilha á partir da planilha atual, mas não consegui.

No "Before Close" da planilha atual, coloquei = Run Fechatudo()

Abaixo o código...
Sub fechatudo()

Windows("Mapa de Vendas por produto.xlsm").Activate
Range("A1").Select
Application.DisplayAlerts = False
ActiveWorkbook.Close savechanges:=False
Application.DisplayAlerts = True
End Sub

Mas é fechado a planilha atual e não fecha essa planilha "Mapa de Vendas por produto.xlsm"

Alguém pode me ajudar ?

[Jimmy]

Olá,

Segue a planilha

Se esta mensagem colabora para a solução do problema, peço que dê um Like, clicando no botão com o "positivo", acima e a direita.

Jimmy San Juan