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.
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.
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?
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?
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.
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.
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.
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
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
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.
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.
Ó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?
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?
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?
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.
voce explica muito bem.. consegui logo de primeira
Parabéns pela aula, explicação bem clara e objetiva, até agora foi a melhor explicação que encontrei sobre este assunto
Voce tem alguma aula gravada sobre ListBox com mais de 30 colunas e usada em um MultiPage? Se tiver, poderia disponibilizar? Muito obrigada.
Muito boa a explicação. Parabéns
Obrigado amigo, continue nos acompanhando. Abraços!
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.
Parabéns pelo video.
Como adiciona o cabeçalho a listbox através do códgo?
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?
Você, me salvou
Show Victor! Continue nos acompanhando, abraços!
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
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.
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.
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.
Me escrevi no canal, conteúdo da hora manoooo!
Tenho Excel Intermediário.
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
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
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: th-cam.com/video/N5eU8ydlRng/w-d-xo.html
Ótimas dicas.
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.
Ó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?
OBRIGADO!
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?
Top
Grupo no facebook para discussão sobre VBA:
facebook.com/groups/209609483226733/
A planilha do vídeo está no grupo do face
👍👍👍👍👍👍
No segundo método como colocar os valores em moeda, no primeiro método ele mostrar certinho
Showwwwwwwww
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?