Notifications
Clear all

Listview com checkbox

7 Posts
2 Usuários
0 Reactions
2,772 Visualizações
(@araujors)
Posts: 79
Estimable Member
Topic starter
 

Boa tarde!
Tenho uma listview de 5 colunas
Coluna 1 malote
Coluna 2 cliente
Coluna 3 Nota fiscal
Coluna 4 Lacre
Coluna 5 Peso
Coluna 6 Status
No projeto que eu tenho aqui eu faço uma busca no txt e importo a mesma para uma planilha e após carrego a mesma no listview do userform, coloquei nas propriedades da listview checkbox = true, como faço para que quando eu clicar na checkbox na coluna status apareça "Nfs recebidas com sucesso", e grave as informações tanto na listview quando na planilha, segue exemplo.
Desde já agradeço, obrigado.

 
Postado : 28/07/2013 1:07 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Araujo, a principio você teria de usar construir a rotina no evento Click do ListView para captar nãoo Item Selecionado e sim a Condição do CheckBox se está clicado ou não, tipo :

If lvDados.ListItems(i).Checked = True Then

Mas antes de continuarmos, pergunto :
Quando clicado ou checkbox = true atualizo o Status da na Aba, mas se por ventura clicar novamente e deixa-lo na condição False, teriamos de reconsiderar o Status ?

Para adicionar a informação no ListView, temos de recarrega-lo novamente, usando : Unload Me e depois lvDados.Show.

Agora pense o seguinte, utilizando o Evento CLICK, cada vez que clicar em um item será chamado uma rotina para pesquisar o item na Aba, apos encontrado, atualiza-lo, depois recarregar o listview, e para o proximo, será efetuado tudo novamente, ou seja, se tivermos 50 itens, estaremos chamando 50 vezes a rotina, e isto demandaria muito mais processamentos.

Na minha opinião, ja que está utilizando o CheckBox, eu não utilizaria o Evento CLICK e sim adicionaria um Botão para ser acionado somente apos selecionarmos os itens no Listview.

Pense nisto e de retorno.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 28/07/2013 3:28 pm
(@araujors)
Posts: 79
Estimable Member
Topic starter
 

Oi Mauro Coutinho, quando eu clica-se em checkbox = true no caso daria a informação "Nfs recebidas com sucesso" caso desclica-se poderia deixar em branco mesmo ou até um "Aguardando retorno das NFs".
gostei da ideia de selecionar tudo e depois clicar em algum botão para atualizar, mas como poderia proceder com esse código, confesso to meio perdido, porque nunca usei checkbox no listview, e para atualizar na hora o listview não poderíamos dar um refresh para que as informações fossem jogadas na planilha e ao mesmo tempo ja aparecessem na listview?

 
Postado : 28/07/2013 6:32 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Fiz algumas modificações, uma vez que o ListView só é preenchido apos a importação, veja se seria mais ou menos isto.

CheckBox em ListView

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 28/07/2013 7:47 pm
(@araujors)
Posts: 79
Estimable Member
Topic starter
 

Mauro Coutinho a planilha que você postou ta dando erro não ta nem abrindo.

 
Postado : 28/07/2013 8:00 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Mauro Coutinho a planilha que você postou ta dando erro não ta nem abrindo.

Araujo, eu baixei, extrai e funcionou corretamente, de qualquer forma atualizei o anexo.

Baixe novamente.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 28/07/2013 8:19 pm
(@araujors)
Posts: 79
Estimable Member
Topic starter
 

Muito obrigado Mauro Coutinho, bem isso que eu precisava obrigado mesmo.

 
Postado : 28/07/2013 8:37 pm