Método Application.AddCustomList (Excel)

Adiciona uma lista personalizada para preenchimento automático personalizado e/ou classificação personalizada.

Sintaxe

expressão. AddCustomList (ListArray, ByRow)

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Listarray	Obrigatório	Variantes	Especifica os dados de origem, seja como uma matriz de sequências de caracteres ou um objeto Range.
ByRow	Opcional	Variantes	Usado apenas se ListArray for um objeto Range. True para criar uma lista personalizada de cada linha no intervalo. False para criar uma lista personalizada de cada coluna no intervalo. Se esse argumento for omitido e houver mais linhas que colunas (ou um número igual de linhas e colunas) no intervalo, o Microsoft Excel criará uma lista personalizada a partir de cada coluna do intervalo. Se esse argumento for omitido e houver mais colunas do que linhas no intervalo, o Excel criará uma lista personalizada de cada linha no intervalo.

Comentários

Se a lista que você está tentando adicionar já existir, esse método gerará um erro de tempo de execução 1004. Pegue o erro com uma instrução On Error .

Exemplo

Este exemplo adiciona uma matriz de sequências como uma lista personalizada.

On Error Resume Next  ' if the list already exists, don'thing
Application.AddCustomList Array("cogs", "sprockets", _ 
 "widgets", "gizmos")
On Error Goto 0       ' resume regular error handling

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.