O que é caixa de listagem no Excel VBA?
Caixa de listagem é uma das ferramentas no formulário do usuário no VBA. Como o próprio nome sugere, a caixa de listagem conterá toda a lista de valores fornecidos pelo usuário. Na caixa de lista do VBA, vem com um formulário de usuário. Neste artigo, veremos como criar uma caixa de listagem e como manter valores na caixa de listagem no Excel VBA.
Caixa de listagem é uma caixa que pode conter valores nela. Nessa lista de itens, o usuário pode selecionar o item mostrado na caixa de listagem.
Também podemos desenhar caixas de listagem em planilhas excel regulares.
Como criar uma caixa de listagem no Excel?
Suponha que você tenha uma lista do mês em uma das planilhas do Excel.
Para esta lista de meses, criaremos uma caixa de listagem. Siga as etapas abaixo para criar a caixa de listagem na planilha do Excel:
Etapa 1: Vá para a guia Desenvolvedor. Em desenvolvedor, guia Ir para a opção Inserir e, em Inserir, opção Ir para Controle de Formulário, no controle de formulário, selecione Caixa de listagem.
Etapa 2: Após selecionar a caixa de listagem, desenhe a caixa de listagem na planilha do Excel.
Etapa 3: Clique com o botão direito do mouse na caixa de listagem inserida e selecione Controle de formato .
Etapa 4: Em Controle de formato, vá para Controle . Selecione o intervalo de entrada como intervalo do nome do mês e forneça a célula para a célula D1 e clique em Ok .
Etapa 5: teremos uma lista do mês na caixa de listagem.
Etapa 6: selecione qualquer um dos itens na caixa de listagem e veja a alteração na célula D1.
Portanto, obtivemos 3 como resultado na célula D1 porque Mar é o terceiro item da lista.
Como criar uma caixa de listagem no VBA?
Criar uma caixa de listagem não é tão fácil como vimos no exemplo acima, você precisa ter uma quantidade considerável de conhecimento em macros do Excel VBA.
Você pode fazer o download deste modelo do Excel da caixa de listagem do VBA aqui - Modelo do Excel da caixa de listagem do VBACaixa de listagem VBA - Exemplo # 1
Compreensão da caixa de listagem do VBA.
Você pode considerar o exemplo a seguir para entender melhor a caixa de listagem do VBA.
Siga as etapas abaixo para criar a caixa de listagem no VBA.
Etapa 1: No formulário Inserir Usuário do Visual Basic Window.
Etapa 2: assim que você inserir o formulário do usuário, poderá ver a caixa de ferramentas junto com o formulário do usuário.
Etapa 3: nesta caixa de ferramentas, selecione Caixa de listagem .
Etapa 4: desenhe esta caixa de listagem no formulário do usuário.
Etapa 5: Depois de inserir a caixa de listagem, atribua um nome adequado a esta caixa de listagem na janela Propriedades.
Etapa 6: role para baixo e encontre "Origem da linha". Neste, digite o intervalo de valores do nome do seu mês junto com o nome da planilha.
Etapa 7: assim que você fornecer a referência, poderá ver os nomes dos meses na caixa de listagem.
Etapa 8: Agora, na janela de propriedades da caixa de listagem, selecione o estilo da linha como " 1 - fmListStyleOption ".
Etapa 9: assim que você selecionar o estilo da linha, poderá ver o impacto imediatamente.
Etapa 10: execute este código, você verá uma caixa de listagem separadamente.
Etapa 11: Agora vamos adicionar o código macro para armazenar os dados selecionados pelo usuário. Clique duas vezes na caixa de listagem. Você verá um nome de macro separado, como o abaixo.
Sub Privado Month_List_Box_Click () End Sub
Etapa 11: quando o usuário selecionar o mês, armazenaremos os dados na célula G5. Para armazenar a entrada fornecida pelo usuário, adicione o código abaixo.
Intervalo privado Sub Month_List_Box_Click () ("G5"). Valor = Month_List_Box.Value End Sub
Etapa 12: agora, se você executar o código e selecionar qualquer um dos meses, podemos ver o valor selecionado pelo usuário na célula G5.
Eu selecionei Jun, para que eu possa ver Jun na célula G5. Assim, podemos usar a caixa de listagem em seus projetos VBA para receber informações dos usuários.
Caixa de listagem VBA - Exemplo # 2
Método Add.Items para adicionar valores à caixa de listagem
Siga as etapas abaixo para criar a caixa de listagem no VBA.
Etapa 1: Crie um novo formulário de usuário. Aqui está o UserForm2.
Etapa 2: Adicionar caixa de lista no formulário de usuário 2.
Etapa 3: Após inserir a caixa de listagem, forneça um nome adequado para esta caixa de listagem na janela Propriedades, ou seja, Month_list_Box1 .
Etapa 4: Agora, na janela de propriedades da caixa de listagem, selecione o estilo da linha como " 1 - fmListStyleOption ".
Etapa 5: clique duas vezes no formulário do usuário. Você verá a macro inserida automaticamente como a abaixo.
Sub Privado UserForm_Click () End Sub
Etapa 6: colocando um cursor dentro da macro, selecione " Inicializar ".
Etapa 7: Assim que você selecionou “Inicializar”, podemos ver uma nova macro a ser criada logo abaixo da atual.
Sub Privado UserForm_Initialize () End Sub
Etapa 8: exclua a macro antiga. Em UserForm, inicialize, escreva o código abaixo para adicionar itens à caixa de listagem.
Private Sub UserForm_Initialize () Month_List_Box1.AddItem "Jan" Month_List_Box1.AddItem "Feb" Month_List_Box1.AddItem "Mar" Month_List_Box1.AddItem "Apr" Month_List_Box1.AddItem "Maio" Month_List_Box1.AddItem "Jun" Month_List_Box1. "Aug" Month_List_Box1.AddItem "Sep" Month_List_Box1.AddItem "oct" Month_List_Box1.AddItem "Nov" Month_List_Box1.AddItem "Dec" End Sub
Etapa 10: Agora pressione o botão F5 para executar o código e você obterá a seguinte saída.
Coisas para lembrar
- Se você estiver fornecendo referência de célula diretamente, precisará especificar o nome da planilha e a referência de célula. (Você precisa adicionar o símbolo de exclamação (!) Na frente do nome da folha).
- Você também pode adicionar itens à caixa de listagem usando o método Add.Item.
- Se você deseja permitir que o usuário selecione mais de um item, selecione a opção "fmMultiSelectMult" em Multi-Select na janela Properties.
Artigos recomendados
Este é um guia para o VBA List Box. Aqui discutimos como criar caixa de listagem no Excel e no VBA, juntamente com exemplos práticos e modelo de excel para download. Você também pode consultar nossos outros artigos sugeridos -
- Como usar o VBA Replace?
- Adicionando caixa de listagem no Excel
- Guia para matrizes VBA do Excel
- Lista suspensa do Excel