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.
Obtém a coleção CommandBarControls que se ajusta aos critérios especificados.
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 Visão geral da faixa de opções Office Fluent.
Sintaxe
mais simples. FindControls (Type, Id, Tag, Visible)
expressão Uma variável que representa um objeto CommandBars .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Type | Opcional | Variant | É uma das constantes MsoControlType que especifica o tipo de controle. |
| Id | Opcional | Variant | O identificador do controle. |
| Tag | Opcional | Variant | O valor da marca do controle. |
| Visible | Opcional | Variant | True para incluir apenas controles de barra de comandos visíveis na pesquisa. O valor padrão é False. |
Valor de retorno
Controles da Barra de Comandos
Comentários
Se nenhum controle que se ajuste aos critérios for encontrado, o método FindControls retornará Nothing.
Exemplo
Este exemplo usa o método FindControls para retornar todos os membros da coleção CommandBars que têm uma ID de 18 e exibe (em uma caixa de mensagem) o número de controles que atendem aos critérios de pesquisa.
Dim myControls As CommandBarControls
Set myControls = CommandBars.FindControls(Type:=msoControlButton, ID:=18)
MsgBox "There are " & myControls.Count & _
" controls that meet the search criteria."
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.