Estou criando um menu com vba. Ele abre as opções do menu que eu coloquei, porém ao clicar no submenu, o menu não esconde automaticamente, preciso clicar no menu novamente para isso acontecer.

Anônima
2023-02-03T12:01:53+00:00

Como escondo o menu automaticamente?

Segue o código

Sub Abrircalendario()

If ActiveSheet.Shapes("MenuMes").Visible = True Then

ActiveSheet.Shapes("MenuMes").Visible = False

Else

ActiveSheet.Shapes("MenuMes").Visible = True

End If

End Sub

Microsoft 365 e Office | Excel | Para uso doméstico | Windows

Pergunta bloqueada. Essa pergunta foi migrada da Comunidade de Suporte da Microsoft. É possível votar se é útil, mas não é possível adicionar comentários ou respostas ou seguir a pergunta.

0 comentários Sem comentários

1 resposta

Classificar por: Mais útil
  1. Dio Xavier 290.8K Pontos de reputação Moderador Voluntário
    2023-02-03T12:56:20+00:00

    Olá

    bem vindo à Comunidade Microsoft Windows 365 e Office.

    Tudo bem, Fred? O Vídeo tutorial abaixo pode ajudar você a criar o Menu e Submenu de forma correta:

    https://www.guiadoexcel.com.br/como-criar-menus-de-sistema-no-excel-design-de-planilha/

    Esta resposta foi útil?

    1 pessoa achou esta resposta útil.
    0 comentários Sem comentários