3 formas de carregar uma listbox no VBA
HTML-код
- Опубликовано: 7 сен 2024
- Curso de VBA do Zero ao Avançado - Assine por apenas R$49,90 por mês sem fidelidade👇🏼
data7academy.c...
Ao fazer sua assinatura hoje você terá acesso imediato a:
✅ Curso de VBA Completo (Do básico ao avançado)
✅ Curso de Excel Completo (Do básico ao avançado)
✅ Plano de Estudos Personalizado
✅ Lista de Exercícios
✅ Desenvolvimento de Sistemas e Programas Práticos em VBA
✅ Integração do VBA com Pacote Office (Word, Power Point, Access e Outlook)
✅ Integração do VBA com MySQL Online (Banco de dados online)
🎁 Lives e Eventos ao Vivo da DATA7 Academy (Todas as edições da Semana VBA na Prática)
🎁 Curso Completo de Web Scraping (Bônus por tempo limitado)
🎁 Curso Básico de Power BI (Bônus por tempo limitado)
🎁 Como ter um perfil atrativo no Linkedin (Bônus por tempo limitado)
🎁 Inglês para Entrevistas (Bônus por tempo limitado)
📃 Certificado de conclusão
➜ Conecte-se com a DATA7 Academy nas redes sociais:
• Instagram: / data7academy
• LinkedIn: / data7academy
• Facebook: / data7academy
• Telegram: t.me/+TDxqvRIc...
• E-mail: vbaacademy@vbaacademy.com.br
Curso de VBA do Zero ao Avançado - Assine por apenas R$49,90 por mês sem fidelidade👇🏼
data7academy.com.br/?origem=yt_org_formascarregarlistboxvba
Boa tarde!
Conteúdo bem elaborado! Parabéns.
Uma dica para utilizar ao "RowSource" é você formatar seus dados como tabela. Altere o nome de sua tabela, inclua ela no comando RowSource e com isso toda nova inclusão entrará automaticamente na sua ListBox.
Sem dúvidas é o comando mais fácil de se utilizar!
Um abraço.
Gostei da didática pois é passada de forma tranquila e boa explicação.vapenas notei que todos os instrutores colocam as variáveis no início impondo ao ouvinte aceitar. Como se tomasse um remédio sem saber para que estou tomando. Depois que tomo e que no final me vem a explicação. Monte o código então mostre a necessidade de criar uma variável para fazer funcionar o programa.
Parabéns pela aula, explicação bem clara e objetiva, até agora foi a melhor explicação que encontrei sobre este assunto
voce explica muito bem.. consegui logo de primeira
Muito boa a explicação. Parabéns
Obrigado amigo, continue nos acompanhando. Abraços!
3 Formas
- 1:10 (RowSource)
- 5:37 (List)
- 10:50 (AddItem)
Só para conseguirem se identificarem melhor =).
Parabéns pelo video.
Voce tem alguma aula gravada sobre ListBox com mais de 30 colunas e usada em um MultiPage? Se tiver, poderia disponibilizar? Muito obrigada.
Top
Saludos desde Venezuela!! El idioma no es impedimento para entender su explicación!! Eso quiere decir que aunque esté en portugués en español se entiende muy claro.
Você, me salvou
Show Victor! Continue nos acompanhando, abraços!
Tenho Excel Intermediário.
Ótimas dicas.
OBRIGADO!
Boa tarde! Ótimo vídeo e bem explicado! Nota-se que no caso de preencher por ROWSOURCE, seria mais para visualizar os dados sem permissão de editar. Parabéns pelo canal. Obrigado.
Agora que tal mostrar como transferir os dados que foram adicionados à ListBox para planilha? Seria bem legal um vídeo ensinando.
Olá, Antônio, segue o vídeo: ruclips.net/video/N5eU8ydlRng/видео.html
Me escrevi no canal, conteúdo da hora manoooo!
Muito boa a explicação, mas fiquei na duvida caso eu queira definir qual coluna inserir no listbox, sem ser sequencial ex: col1, col3, col8 e assim por diante. obg abraços.
Excelente explicação, só não consegui entender porque esta dando erro quando cadastro novo item e ao fechar o formulário o Excel reinicia sem efetuar o novo cadastro, estou utilizando o Me.LISTA.RowSource = "Clientes" para carregar a listbox.
Como adiciona o cabeçalho a listbox através do códgo?
Bom dia amigo, muito obrigado por compartilhar conhecimento. Deus Abençoe cada vez mais com sabedoria. Fiz um cadastro de cliente para carregar no formulário e fazer pesquisas, mas quando tem mais de 100 dados a carregar fica muito lento, teria como fazer ao invés de carregar todos os conteúdos da planilha no formulario, fazer somente carregar os que busco escrito na linha de pesquisa?
Muito obrigado, tudo de bom?
Entra no canal dele q tem vídeos sobre filtrar a listbox. Abraços
receba os meus cumprimentos mediante a hora do dia desde ja os meus parabenns tenho aprendido bastante com as suas aulas, tengo uma dúvida e agradeceria o seu apoio. estou desenolvendo um projecto e estou com as seguintes dificuldades: inserir os botoes maximizar e minimizar como bloquear totalmente o projecto, como parar de mostrar a folha do excer antes da folha de login. agradeceria bem haja
Ótima Explicação, muito obg. Mas na opção rource se em vez de você colocar A1:D5 É SÓ COLOCAR A1: D1048576 Que nesse caso seria a última linha da planilha, então vai mostrar tudo, estou certa?
Olá, tudo bem?
Usando o método “ Variável = a Range.Value e ListiBox .List = a Variável” que vc ensina neste vídeo, da para formatar uma coluna em formato de moeda, ou só dá para formatar usando o método Arrays para preencher a ListBox e conseguir formatar?
👍👍👍👍👍👍
Saudações, Israel! Há um conflito no meu código e ainda não consegui identificar. Modifiquei alguns campos acrescentando datas e horários, por exemplo, mas não consigo a pesquisa por data ou por outros campos, senão apenas um. Inseri 7 campos para a listagem e executando o filtro todos aparecem. Quando preencho o campo de pesquisa não há retorno. Um único campo aceita a filtragem, mas para isso tenho de fechar e reiniciar a execução. As linhas dos TextBox seguem o mesmo raciocínio, mas não identifico o erro. Pode me ajudar?
Lembrando que esse conflito eu me refiro às aulas 1, 2 e 3 Aplicando Filtro Avançado.
Olá. Daria para explicar como fixar a 1ª linha como cabeçalho ?
Altere a propriedade ColumnHeads da ListBox para "True"
retificando mude para ColumnHeads = "False" ou pode omitir o cabeçalho no ListBox e criar Labels acima do ListBox nas respectivas colunas, ou ainda pode fazer outro ListBox só para o cabeçalho
Tenho interesse no curso, quando você fala em ShowModal para ocultar, VC se refere a um formulário, mas minha ListBox está em uma aba de uma Multi Página, teria algo parecido?
No seu exemplo você trabalha com apenas uma planilha, no caso de várias o comando por exemplo seria este? 'ListBox1.RowSource = Worksheet("dados_SAS").Range("A2:C100").CurrentRegion.Address
Bom dia, Haroldo. Não entendi o que você quis dizer no caso da Multi Página. Quanto à sua ListBox, se o seu intervalo é A2:C100 então vc nao precisa usar o CurrentRegion, pois o seu intervalo já está determinado. E não esqueça do parâmetro External estar marcado como TRUE na propriedade Address para que ele funcione mesmo quando outra planilha estiver ativa.
Showwwwwwwww
No segundo método como colocar os valores em moeda, no primeiro método ele mostrar certinho
Bom dia! Estou tentando inserir a programação pelo additem mas apresenta um erro que não consegui ajustar "Não foi possivel definir a propriedade list. Indice de matriz de propriedade invalido". Segue abaixo condigo utilizado, em resumo ele deve me apresentar uma listagem ignorando as linhas que estão em branco na primeira coluna. apresentando o valor de todas as linhas que possuem valor na primeira coluna. Consegue me ajudar?
Dim linha As Integer
Dim n As Integer
linha = 1
n = lb_contratos.ListCount - 1
Do Until Planilha9.Cells(linha, 2) = ""
If Planilha9.Cells(linha, 1) "" Then
With Me.lb_contratos
.AddItem
.List(n, 0) = Planilha9.Cells(linha, 1)
.List(n, 1) = Planilha9.Cells(linha, 2)
.List(n, 2) = Planilha9.Cells(linha, 3)
.List(n, 3) = Planilha9.Cells(linha, 4)
.List(n, 4) = Planilha9.Cells(linha, 5)
.List(n, 5) = Planilha9.Cells(linha, 6)
.List(n, 6) = Planilha9.Cells(linha, 7)
.List(n, 7) = Planilha9.Cells(linha, 8)
.List(n, 8) = Planilha9.Cells(linha, 9)
.List(n, 9) = Planilha9.Cells(linha, 10)
.List(n, 10) = Planilha9.Cells(linha, 11)
.List(n, 11) = Planilha9.Cells(linha, 12)
.List(n, 12) = Planilha9.Cells(linha, 13)
End With
End If
linha = linha + 1
n = n + 1
Loop
Me.lb_contratos.ColumnCount = 13
Me.lb_contratos.ColumnHeads = True
Boa noite, Luis. Através do método AddItem é possível acrescentar no máximo 10 colunas à listbox, por isso ela está dando o erro para você. Caso queira colocar mais use a propriedade RowSource junto com o filtro Avançado para eliminar registros em branco (há vídeos no canal sobre isso), ou use a propriedade List com os dados provenientes de uma variável matriz. Ex: dim K(5,15). Nesse caso K é uma variavel com 5 linhas e 15 colunas, depois que acrescentar dados à ela (há vídeos no canal sobre isso) você joga tudo na listbox fazendo lb_contratos.List = k
@@DATA7Academy @VBA Academy Beleza amigo! Porém eu nao preciso das 13 colunas na listbox, posteriormente iria oculta-las, então isso so esta me ajudando, porem alterei pra 8 colunas e deu a mesma mensagem de erro, sabe me dizer aonde estou errando?
Grupo no facebook para discussão sobre VBA:
facebook.com/groups/209609483226733/
A planilha do vídeo está no grupo do face
Criei um formulário VBA na "Planilha1", e nesse formulário criei um botão de "buscar". Quando clico nele, outro formulário VBA com uma ListBox é aberto. Esta ListBox deve buscar os dados que estão em outra planilha, "Planilha4". Para puxar os dados para a ListBox, desenvolvi o seguinte código:
Private Sub UserForm_Initialize()
LISTCLIENTES.RowSource = Planilha4.Range("A3").CurrentRegion.Address
End Sub
Porém, a ListBox está puxando os dados da "Planilha1", e não os da "Planilha4".
Sabe me informar como resolver este problema?