Saberexcel - site das macros

Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), insere uma lista personalizada no Aplicativo Microsoft Excel
As listas personalizadas são caracterizadas pelo preenchimento persolizado de células quando se arrasta células a partir do primeiro nome na célula
Observe que quando voce acionar a macro, insere a Lista Personalizada, uma vez inserido a lista personalizada, ao tentar excecutar a macro novamente retorna uma mensagem que a referida lista de personalizada já foi criada.
- veja no exemplo de planiha, abaixo faça o download do exemplo, se precisar.

Sub Inserir_Lista_Personalizada()
 On Error GoTo sbError
 
 Application.AddCustomList ListArray:=Range("B2:B19")
 Range("D5").Select
 Exit Sub

sbError:
 MsgBox "Lista personalizada criada, agora você poderá fazer o teste!", vbInformation, "Saberexcel"
End Sub

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application),sozinho, com baixo custo, praticando com os produtos didáticos SaberExcel



 Baixe o exemplo de planilha contendo a macro acima
vba aplicativo excel lista personalizada (78.66 KB 2011-02-11 20:38:16)