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.
Retorna uma lista personalizada (uma matriz de sequências de caracteres).
Sintaxe
expressão. GetCustomListContents (ListNum)
expressão Uma variável que representa um Aplicativo objeto.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| ListNum | Obrigatório | Long | O número da lista. |
Valor de retorno
Variant
Exemplo
Este exemplo grava os elementos da primeira lista personalizada na coluna um de Sheet1.
listArray = Application.GetCustomListContents(1)
For i = LBound(listArray, 1) To UBound(listArray, 1)
Worksheets("sheet1").Cells(i, 1).Value = listArray(i)
Next i
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.