Compartilhar via


Método CommandBars.FindControls (Office)

Obtém a coleção CommandBarControls que se encaixa nos 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 fluente do Office.

Sintaxe

expressão. FindControls (Tipo, ID, Marca, Visível)

Expressão Uma variável que representa um objeto CommandBars .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Type Opcional Variantes É uma das constantes MsoControlType que especificam o tipo de controle.
Id Opcional Variantes O identificador do controle.
Tag Opcional Variantes O valor da marca do controle.
Visible Opcional Variantes True para incluir apenas controles de barra de comando visíveis na pesquisa. O valor padrão é False.

Valor de retorno

CommandBarControls

Comentários

Se nenhum controle que se encaixe nos critérios for encontrado, o método FindControlsretornará 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.