Programando o Excel ® Vba Para Leigos - 2ª Ed 2013 NoDRM (1)

Capítulo 18: Técnicas e Truques do UserForm 297
DICA
55
MultiSelect: Esta propriedade determina se o usuário pode
selecionar mais de um item da lista.
55
RemoveAllItems: Use este método para remover todos os itens
da lista.
55
Selected: Esta propriedade retorna um array, indicando itens
selecionados (aplicável apenas quando são permitidas
múltiplas seleções).
55
Value: Esta propriedade retorna o item selecionado em uma
lista.
A maioria dos métodos e propriedades que trabalham com caixas de
listagem também trabalha com caixas de combinação. Assim, depois de
ter descoberto como lidar com caixas de listagem, você pode transferir
esse conhecimento para o seu trabalho com caixas de combinação.
Preenchendo uma Caixa de Listagem
Para melhores resultados, comece com uma pasta de trabalho vazia. O
exemplo nesta seção supõe o seguinte:
55
Você adicionou um UserForm.
55
O UserForm contém um controle caixa de listagem chamado
ListBox1.
55
O UserForm tem um Botão de comando chamado OKButton.
55
O UserForm tem um Botão de comando chamado CancelButton,
o qual tem o seguinte procedimento ao ser clicado:
Private Sub Cancelbuton_Click()
Unload UserForm1
End Sub
O seguinte procedimento é armazenado no procedimento Initialize do
UserForm:
1. Selecione o seu UserForm e pressione F7 para ativar a sua janela
de código.
O VBE exibe a janela de código para o seu formulário e está pronto
para você entrar com o código para o evento Initialize.
2. Usando a lista drop-down de Procedure no alto da janela de
código, escolha Initialize.
3. Adicione o código de inicialização ao formulário:
Sub Userform_Initialize()
‘ Preencha a caixa de listagem
With ListBox1
.AddItem “Janeiro”
.AddItem “Fevereiro”
.AddItem “Março”
.AddItem “Abril”
.AddItem “Maio”
.AddItem “Junho”