Página 1 de 1

Saber valor de itens visíveis da ListBox

Enviado: 15 Out 2019 às 14:00
por JCabral
Boa tarde

Tenho um problema que não sei se é possível de resolver, mas aqui é por certo o melhor sitio para saber, é assim:

- Tenho uma ListBox com várias colunas, no exemplo que anexo fiz apenas com três mas podem ser 14, em que só quero mostrar determinadas colunas, neste caso só mostro as duas primeiras colunas, e só mostro 12 itens da ListBox de cada vez;
- Ou seja o Comprimento, a largura e o número de itens visíveis (linhas da ListBox) são fixos - neste caso são 12.

O que pretendia é que sempre que o valor da terceira coluna fosse diferente de "", ou seja sempre que exista valor, a cor da label, que agora está vermelha mudasse para amarelo (ou outra cor qualquer), isto sem fazer "Click" na ListBox, ou seja quando mostro a ListBox pela primeira vez, aos itens visíveis da ListBox correspondem o ListIndex=0 a ListIndex=11; mas conforme vou andando para cima ou para baixo os itens visíveis variam assim como os ListIndex visíveis.

É possível fazer o que pretendo?

Obrigado
Jorge Cabral

Re: Saber valor de itens visíveis da ListBox

Enviado: 15 Out 2019 às 17:09
por eduardogrigull
Não funciona exatamente como o esperado, pois não existe o evento Mouse_Scroll numa Listbox no Vba. Mas fiz um loop pra ficar verificando. Na teoria está funcionando, veja se consegue aproveitar algo!!!

Saber valor de itens visíveis da ListBox

Enviado: 15 Out 2019 às 20:34
por JCabral
Boa noite Eduardogrigull

A ideia é essa, só que, tal como você diz, não está funcionando direito. Mal se abre a userform os valores não ficam direitos.

Obrigado

Saber valor de itens visíveis da ListBox

Enviado: 16 Out 2019 às 02:40
por eduardogrigull
Nesse site aqui tem como manipular o GetFocus e LostFocus de uma Listbox, mas se usa declaração de API. Talvez possa ajudar: https://www.pcreview.co.uk/threads/sync ... s.1145565/

Saber valor de itens visíveis da ListBox

Enviado: 16 Out 2019 às 09:01
por JCabral
Muito obrigado eduardogrigull, mas isso vai ser areia demasiada para o meu camião.
Vou aguardar para ver se surge mais uma ajuda.

Muito obrigado.