Esqueceu sua senha? Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Como saber o indice da coluna no listview

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Robson Gomide
Acabou de chegar
Acabou de chegar
Mensagens: 3
Registrado em: Qua Out 03, 2018 6:49 pm

Como saber o indice da coluna no listview

Mensagem por Robson Gomide » Ter Nov 05, 2019 1:58 pm

Boa tarde;

Preciso saber em qual linha e coluna o usuário clicou em um ListView.
a Linha até que é fácil, mas a coluna não consegui achar nada, já procurei bastante e fiz vários testes e não achei nenhum opção que funcione.

Alguém tem uma solução ?

estou usanto o office 2019.

Obrigado.



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.


Robson Gomide
Acabou de chegar
Acabou de chegar
Mensagens: 3
Registrado em: Qua Out 03, 2018 6:49 pm

Re: Como saber o indice da coluna no listview

Mensagem por Robson Gomide » Qua Nov 06, 2019 12:43 pm

Consegui resolver de um modo meio grotesco, mas, no meu caso, deu certo.
Public Function Pega_IndiceColuna(ByVal LV As ListView, ByVal x As Single) As Integer
Dim i As Integer
Dim ponto As Integer

ponto = Int(x * 0.76)

For i = 1 To LV.ColumnHeaders.Count
If ponto >= (LV.ColumnHeaders(i).Left + LV.Left) And _
ponto <= (LV.ColumnHeaders(i).Left + LV.Left + LV.ColumnHeaders(i).Width) Then
Exit For
End If
Next i

If i > LV.ColumnHeaders.Count Then i = 0

Pega_IndiceColuna = i

End Function



Responder