300 Exemplos

List Box

List Box

Uma caixa de listagem é uma lista de onde um usuário pode selecionar um item. Para criar um caixa de lista no Excel VBA , execute as etapas a seguir.

1. No Guia do desenvolvedor , clique em Inserir.



formatação condicional do excel se a célula contiver texto específico

2. No grupo ActiveX Controls, clique em List Box.



Crie uma caixa de listagem no Excel VBA

3. Arraste uma caixa de listagem em sua planilha.



Arraste uma caixa de listagem

Observação: você pode alterar o nome de um controle clicando com o botão direito do mouse no controle (certifique-se de que o Modo de design esteja selecionado) e clicando em Propriedades. Por enquanto, deixaremos ListBox1 como o nome da caixa de listagem.

Crie um evento de abertura de pasta de trabalho. O código adicionado ao evento de abertura da pasta de trabalho será executado pelo Excel VBA quando você abrir a pasta de trabalho.



4. Abra o Editor Visual Basic .

5. Clique duas vezes em This Workbook no Project Explorer.

6. Escolha Workbook na lista suspensa à esquerda e escolha Abrir na lista suspensa à direita.

Evento de abertura de pasta de trabalho no Excel VBA

7. Para adicionar itens à caixa de listagem, adicione as seguintes linhas de código ao Workbook Open Event:

ComSheet1.ListBox1
.AddItem 'Paris'
.AddItem 'New York'
.AddItem 'Londres'
Fim Com

Observação: use a Planilha2 se sua caixa de listagem estiver localizada na segunda planilha, Planilha3 se a caixa de listagem estiver localizada na terceira planilha, etc. Se você usar essas linhas de código fora do evento Abrir a pasta de trabalho, você pode querer adicionar a seguinte linha de código antes dessas linhas de código. Esta linha de código limpa a caixa de listagem. Dessa forma, seus itens não serão adicionados várias vezes se você executar o código mais de uma vez.

calcular entre duas datas no excel
ListBox1.Clear

8. Para vincular esta caixa de listagem a uma célula, clique com o botão direito do mouse na caixa de listagem (certifique-se de que o modo de design esteja selecionado) e clique em Propriedades. Preencha D3 para LinkedCell.

LinkedCell

Observação: consulte também a propriedade ListFillRange para preencher uma caixa de listagem com um intervalo de células.

9. Salve, feche e reabra o arquivo Excel.

Resultado:

List Box

Embora em algumas situações possa ser útil colocar diretamente uma caixa de listagem em sua planilha, uma caixa de listagem é particularmente útil quando colocada em um Userform .

como usar texto para colunas

3/8 concluído! Saiba mais sobre os controles Activex>
Vá para o próximo capítulo: Userform



^