Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Exibe uma barra de comandos como um menu de atalho nas coordenadas especificadas ou nas coordenadas atuais do ponteiro.
Observação
[!OBSERVAçãO] O uso de CommandBars em alguns aplicativos do Microsoft Office foi substituído pelo novo componente da faixa de opções da interface de usuário do Microsoft Office Fluent. Para obter mais informações, consulte Descrição geral do friso do Office Fluent.
Sintaxe
expressão. ShowPopup(x, y)
expressão Uma variável que representa um objeto da Barra de Comandos .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| x | Opcional | Variant | A coordenada x na qual se baseia a localização do menu de atalho. Se este argumento for omitido, será utilizada a coordenada x atual do ponteiro. |
| y | Opcional | Variant | A coordenada y na qual se baseia a localização do menu de atalho. Se este argumento for omitido, será utilizada a coordenada y atual do ponteiro. |
Comentários
Quando os menus estão alinhados à esquerda, o menu de atalho apresentado pelo método ShowPopup tem o canto superior esquerdo em (x, y + 1); Quando os menus estão alinhados à direita, o menu de atalho tem o canto superior direito em (x + 1, y + 1). Utilize a função do Windows GetSystemMetrics(SM_MENUDROPALIGNMENT) para marcar a métrica do sistema para alinhamento do menu pendente.
Quando a localização do ecrã das coordenadas (x, y) faria com que a totalidade ou parte do menu de pop-up fosse apresentada para além da margem do ecrã visível, o menu de pop-up muda para caber na área visualizável.
Exemplo
Este exemplo cria um menu de atalho contendo dois controles. O método ShowPopup é usado para tornar visível o menu de atalho.
Set myBar = CommandBars _
.Add(Name:="Custom", Position:=msoBarPopup, Temporary:=False)
With myBar
.Controls.Add Type:=msoControlButton, Id:=3
.Controls.Add Type:=msoControlComboBox
End With
myBar.ShowPopup
Observação
Se a propriedade Position da barra de comandos não estiver definida como msoBarPopup, esse método irá falhar.
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.