Compartilhar via


Application.AddCustomList method (Excel) (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 Variant Especifica os dados de origem, seja como uma matriz de sequências de caracteres ou um objeto Range.
ByRow Opcional Variant 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 este argumento for omitido e existirem mais colunas do que linhas no intervalo, o Excel cria uma lista personalizada a partir de cada linha no intervalo.

Comentários

Se a lista que está a tentar adicionar já existir, este método gera um erro de tempo de execução 1004. Detete o erro com uma instrução Ao Ativar Erro .

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.