2 réponses
Dans la prcedure Click de la grid, place le code :
c = Grid.Col
r = Grid.Row
Grid.Col = c
For a = 1 To Grid.Rows - 1
Grid.Row = a
Grid.Text = "X"
Next
Grid.Row = r
For a = 1 To Grid.Cols - 1
Grid.Col = a
Grid.Text = "Y"
Next
Ca affiche les "x" sur la colonne, et le "y" sur la ligne.
c = Grid.Col
r = Grid.Row
Grid.Col = c
For a = 1 To Grid.Rows - 1
Grid.Row = a
Grid.Text = "X"
Next
Grid.Row = r
For a = 1 To Grid.Cols - 1
Grid.Col = a
Grid.Text = "Y"
Next
Ca affiche les "x" sur la colonne, et le "y" sur la ligne.
En fait ça ne marche pas bien car il faut changer de cellule pour que le "X" s'inscrive.
J'ai simplement besoin que lorsque je clique dans la cellule d'une colonne donnée s'inscrive la lettre "X".
Je pourrais ecrire simplement s'il s'agit de la colonne N° 1
Grid.Col =1
Grid.Text = "X"
mais le "X" ne s'inscrit qu'à retardement. Il faudrait trouver une combine qui puisse pour que le "X" soit déposé au moment du click.
Merci
J'ai simplement besoin que lorsque je clique dans la cellule d'une colonne donnée s'inscrive la lettre "X".
Je pourrais ecrire simplement s'il s'agit de la colonne N° 1
Grid.Col =1
Grid.Text = "X"
mais le "X" ne s'inscrit qu'à retardement. Il faudrait trouver une combine qui puisse pour que le "X" soit déposé au moment du click.
Merci