Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Erro tempo de execução ao utilizar listbox
-
- Acabou de chegar
- Mensagens: 4
- Registrado em: Qui Jan 23, 2014 9:22 pm
Erro tempo de execução ao utilizar listbox
Prezados, preciso de uma ajuda.
Estou montando um userform o qual possui duas listbox, onde pretendo que ao selecionar um item da listbox1 e clicar em um botão, ele transfira o valor selecionado para a listbox2 e apague da listbox1.
Parece simples mas quando executo esta macro aparece o seguinte erro "-2147024809 Erro em tempo de execução (80070057)".
Segue o codigo que estou usando:
Private sub Image1_click ()
listbox2.additem (listbox1.value)
listbox1.removeitem (listbox1.listindex)
end sub
Quando ocorre o erro a linha do "removeitem" fica selecionada. Eu removi esta linha e o a parte de adicionar está funcionando, o problema está em excluir da listbox1 mesmo.
OBS: Estou utilizando o Excel 2007, não sei se isso interfere.
Se alguém puder ajudar, agradeco.
Estou montando um userform o qual possui duas listbox, onde pretendo que ao selecionar um item da listbox1 e clicar em um botão, ele transfira o valor selecionado para a listbox2 e apague da listbox1.
Parece simples mas quando executo esta macro aparece o seguinte erro "-2147024809 Erro em tempo de execução (80070057)".
Segue o codigo que estou usando:
Private sub Image1_click ()
listbox2.additem (listbox1.value)
listbox1.removeitem (listbox1.listindex)
end sub
Quando ocorre o erro a linha do "removeitem" fica selecionada. Eu removi esta linha e o a parte de adicionar está funcionando, o problema está em excluir da listbox1 mesmo.
OBS: Estou utilizando o Excel 2007, não sei se isso interfere.
Se alguém puder ajudar, agradeco.
-
- Colaborador
- Mensagens: 98
- Registrado em: Qui Nov 01, 2012 2:37 pm
Re: Erro tempo de execução ao utilizar listbox
nilson rafael,
bom dia!
Para ficar mais fácil lhe ajudar, compacte seu exemplo aqui e tentaremos resolver o seu problema!!!
Att,
bom dia!
Para ficar mais fácil lhe ajudar, compacte seu exemplo aqui e tentaremos resolver o seu problema!!!
Att,
-
- Acabou de chegar
- Mensagens: 4
- Registrado em: Qui Jan 23, 2014 9:22 pm
Re: Erro tempo de execução ao utilizar listbox
olá, obrigado pela atenção...
então, minha planilha está no meu serviço, e la não tenho acesso ao site (é bloqueado), mas vou salvá-la e segunda mando aqui.
Obrigado..
então, minha planilha está no meu serviço, e la não tenho acesso ao site (é bloqueado), mas vou salvá-la e segunda mando aqui.
Obrigado..
-
- Acabou de chegar
- Mensagens: 4
- Registrado em: Qui Jan 23, 2014 9:22 pm
Re: Erro tempo de execução ao utilizar listbox
Amigos, segue planilha.
Caso o erro não apareça para voces eu colei as imagens no corpo da planilha.
Esta não é a planilha que eu estou fazendo o codigo, mas o erro é o mesmo.
Se alguém puder ajudar, agradeço!
Ahh....aproveitando, se souberem preciso de ajuda para mais dois comandos:
* codigo para quando adicionar os valores na listbox2, eles ficarem em ordem alfabética, ou numérica.
* E uma caixa de busca....na planilha original, minha listbox1 tem mais de 4 mil itens, e fica dificil ficar procurando tudo.
Se conseguirem agradeço muitoo!
Caso o erro não apareça para voces eu colei as imagens no corpo da planilha.
Esta não é a planilha que eu estou fazendo o codigo, mas o erro é o mesmo.
Se alguém puder ajudar, agradeço!
Ahh....aproveitando, se souberem preciso de ajuda para mais dois comandos:
* codigo para quando adicionar os valores na listbox2, eles ficarem em ordem alfabética, ou numérica.
* E uma caixa de busca....na planilha original, minha listbox1 tem mais de 4 mil itens, e fica dificil ficar procurando tudo.
Se conseguirem agradeço muitoo!
- Anexos
-
- Outlook (2).zip
- repassar valores de listbox
- (169.43 KiB) Baixado 248 vezes
-
- Colaborador
- Mensagens: 98
- Registrado em: Qui Nov 01, 2012 2:37 pm
Re: Erro tempo de execução ao utilizar listbox
nilson rafael,
bom dia!
Segue um exemplo mais completo para você estudar!
Att,
bom dia!
Segue um exemplo mais completo para você estudar!
Att,
- Anexos
-
- ListBox_30_01_14.zip
- (26.2 KiB) Baixado 279 vezes
-
- Acabou de chegar
- Mensagens: 4
- Registrado em: Qui Jan 23, 2014 9:22 pm
Re: Erro tempo de execução ao utilizar listbox
Marciel Silva, obrigado pela ajuda.
Mas eu não entendo muito (ou quase nada de VBA), e não consegui adaptar para o que preciso.
Eu encontrei um outro codigo, vou ver se da certo.
Se não der, eu peço ajuda de vcs aqui de novo.
Mas obrigado mesmo pela ajuda.
vlw
Mas eu não entendo muito (ou quase nada de VBA), e não consegui adaptar para o que preciso.
Eu encontrei um outro codigo, vou ver se da certo.
Se não der, eu peço ajuda de vcs aqui de novo.
Mas obrigado mesmo pela ajuda.
vlw
- joseA
- Jedi
- Mensagens: 1048
- Registrado em: Qui Out 22, 2009 7:22 am
- Localização: Cel. Fabriciano - MG
Re: Erro tempo de execução ao utilizar listbox
Código: Selecionar todos
Private Sub CommandButton1_Click()
ListBox2.AddItem (ListBox1.ListIndex + 1)
'ListBox1.RemoveItem (ListBox1.ListIndex)
End Sub
Private Sub CommandButton2_Click()
'ListBox1.AddItem (ListBox2.ListIndex)
ListBox2.RemoveItem (ListBox2.ListIndex)
End Sub