Click dans une flexgril

Question

Sûrement très simple... Quelque chose m'échappe... A l'aide...

Je m'explique par un exemple.

J'ai une grille appelée "msgOuvrir"

J'utilise la propriété :
msgOuvrir.selectionMode = flexSelectionFree
pour me permettre une selection sur les lignes et les colonnes à la fois.

Quand je clique en plein milieu de ma grille (par exemple, 5e ligne, 6 colonne),
je voudrais connaitre les indices ligne et colonne de mon clic.

J'utilise pour cela
lignechoisie = msgOuvrir.RowSel
colonnechoisie = msgOuvrir.ColSel

Mais ces deux variables ne stockent pas les bonnes valeurs.

Qui peut m'aider ?
jyd

cs_DARKSIDIOUS · Answer

As-tu essayé les propriété col et row plutôt ? Elle te donne les coordonnée de la cellule courante.

jytest · Answer

Dès lors, comment rendre courante une cellule sur laquelle je cliquerai ?

Qui peut m'aider 

jyd

jmfmarques · Answer

Comment rendre courante la cellule sur laquelle tu cliquerais ? 
C'est un peu comme si tu disais : comment rendre actif le contrôle sur lequel je clique !

jytest · Answer

Au risque de paraitre ridicule, même si, dans mon code, je remplace

lignechoisie = msgOuvrir.RowSel
colonnechoisie = msgOuvrir.ColSel

par

lignechoisie = msgOuvrir.Row
colonnechoisie = msgOuvrir.Col

cela ne fonctionne pas non plus !!!

Pourquoi ?
jyd

jmfmarques · Answer

Ah ?

j'espère que ta msflexgrig a pour nom msgOuvrir et que tu utilises son événement clicl !

Private Sub msgOuvrir_Click()
  lignechoisie = msgOuvrir.Row
  colonnechoisie = msgOuvrir.Col
  MsgBox lignechoisie & " " & colonnechoisie
End Sub

et clique sur une cellule de ton choix... et vois...

jytest · Answer

Merci de ton aide... J'ai compris mon erreur!!!!

Je n'avais bloqué la propriété
msgOuvrir.SelectionMode =flexSelectionFree

Mille excuses !!!

jyd

cs_MPi · Answer

Tu peux aussi utiliser MouseRow et MouseCol

Private Sub MSFlexGrid1_DblClick()
    MsgBox "Index de colonne: " & MSFlexGrid1.MouseCol & _
            vbCrLf & _
           "Index de ligne: " & MSFlexGrid1.MouseRow
End Sub

MPi

Renfield · Answer

ok avec MPi

gaffe cependant lors du deboguage ^^

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Click dans une flexgril

8 réponses

Votre réponse

Discussions similaires