Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Abrir um Userform com item da ListView?

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Vergilio_reinaldo
Colaborador
Colaborador
Mensagens: 16
Registrado em: Ter Set 25, 2012 10:56 pm

Abrir um Userform com item da ListView?

Mensagem por Vergilio_reinaldo »

Bom dia pessoal do fórum,

Estou com mais um dúvida de VB, Ela seria o seguinte no userform1 tenho uma listview que contém itens (ID, PAÍS, ESTADO) (EX.)

E tem um Textbox para filtrar o País, o que eu gostaria de fazer é o seguinte quando eu der duplo click em algum item dessa ListView ele chame por exemplo um outro Userform. Estou mandando um exemplo para dar uma idéia.


Obrigado pessoal, pela atenção.
Anexos
ListView no Excel.zip
(13.36 KiB) Baixado 548 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
BaptistaCG
Colaborador
Colaborador
Mensagens: 96
Registrado em: Seg Jul 30, 2012 10:33 pm
Localização: Sorocaba/SP

Re: Abrir um Userform com item da ListView?

Mensagem por BaptistaCG »

Vergilio_reinaldo escreveu:Bom dia pessoal do fórum,

Estou com mais um dúvida de VB, Ela seria o seguinte no userform1 tenho uma listview que contém itens (ID, PAÍS, ESTADO) (EX.)

E tem um Textbox para filtrar o País, o que eu gostaria de fazer é o seguinte quando eu der duplo click em algum item dessa ListView ele chame por exemplo um outro Userform. Estou mandando um exemplo para dar uma idéia.


Obrigado pessoal, pela atenção.
Olá Vergilio

Basta colocar esse codigo no seu form

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
'Aqui é a rotina que deseja fazer após o duplo click
userform2.Show
End Sub

Espero ter Ajudado.

Att...


Vergilio_reinaldo
Colaborador
Colaborador
Mensagens: 16
Registrado em: Ter Set 25, 2012 10:56 pm

Re: Abrir um Userform com item da ListView?

Mensagem por Vergilio_reinaldo »

Bom dia BaptistaCG

Então não era bem isso que eu precisava, o que eu preciso é que um item dessa listview ex.(ID - 9, País - BRASIL, Estado - Bahia) esse item abra a userform? O que vou fazer futuramente é que cada item dessa listview vai abrir uma informação.


Obrigado pela atenção.


Avatar do usuário
BaptistaCG
Colaborador
Colaborador
Mensagens: 96
Registrado em: Seg Jul 30, 2012 10:33 pm
Localização: Sorocaba/SP

Re: Abrir um Userform com item da ListView?

Mensagem por BaptistaCG »

Vergilio_reinaldo escreveu:Bom dia BaptistaCG

Então não era bem isso que eu precisava, o que eu preciso é que um item dessa listview ex.(ID - 9, País - BRASIL, Estado - Bahia) esse item abra a userform? O que vou fazer futuramente é que cada item dessa listview vai abrir uma informação.


Obrigado pela atenção.
Bom dia,

Ah desculpe, eu pensei que fosse um listview dentro de um userform que quando desse o duplo click ele chamasse um comando, mas você deseja então fazer este procedimento em uma lista na planilha, bom eu desconheço esta possibilidade pois o duplo click no excel corresponde a rotina de renomear.
Talvez seja melhor se você colocar um listview no userform pois ele já tem essa caracteristica, estou deixando o exemplo do Tomaz aqui da listview com filtro já incluso para você dar uma olhada.

Abraço...
Att.
Anexos
Filtro.rar
(45.3 KiB) Baixado 551 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Vergilio_reinaldo
Colaborador
Colaborador
Mensagens: 16
Registrado em: Ter Set 25, 2012 10:56 pm

Re: Abrir um Userform com item da ListView?

Mensagem por Vergilio_reinaldo »

Boa tarde Vinicius,

Então melhorei meu exemplo pra tentar arrumar alguma ideia.

O arquivo em anexo contém 02 userform. quando vc clicar no botão execultar no excel ele vai chamar o formulário "Filtra com Combox" se vc der duplo click no ID 10 ele vai chamar o outro userform "Filtra com ListView".

para fazer isso na combBox eu usei o seguinte comando.

Private Sub lstLista_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If lstLista = "10" Then
UserForm1.Show
End If
End Sub

Só que eu não consigo fazer o mesmo com a ListView? Preciso achar um forma de fazer isso com uma ListView.

Obrigado novamente pela atenção
Anexos
ListView no Excel.zip
(22.13 KiB) Baixado 486 vezes


Avatar do usuário
BaptistaCG
Colaborador
Colaborador
Mensagens: 96
Registrado em: Seg Jul 30, 2012 10:33 pm
Localização: Sorocaba/SP

Re: Abrir um Userform com item da ListView?

Mensagem por BaptistaCG »

Amigo

Acho que tem algum codigo que está com erro no seu projeto, pois o seu script está correto, eu coloquei ele em outro filtro e ele funcionou perfeitamente, testa ae pra você ver....em anexo... Assim que eu achar o que está impedindo o funcionamento no seu projeto eu posto aqui.

Att...
Anexos
Filtro Tomas.rar
(46.37 KiB) Baixado 581 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder