bonjour,
J'aii 'enfin) réussi à mettre en place une flexgrid
J'ai donc 3 colonnes (venant de SQL) + 1 colonne vierge.
J'aimerais rendre cette colonne active au niveau de l'ecriture, cad je veux que l'utilisateur puisse ecrire des nombre dedans!!
Merci de m'aider!
voici mon code pour le flex:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33 With flex .Visible = True .Rows = 1 .Cols = 4 .Row = 0 'Se placer à la premiere ligne For I = 0 To .Cols - 1 .col = I 'Se balader de colone en colone Select Case I Case 1: .Text = "Nom" .ColAlignment(I) = flexAlignLeftCenter Case 2: .Text = "Prenom" .ColAlignment(I) = flexAlignLeftCenter Case 3: .Text = "Cote" .ColAlignment(I) = flexAlignLeftCenter End Select .CellAlignment = flexAlignCenterCenter Next I End With total = rc.RecordCount For I = 1 To total txt = I & vbTab txt = txt & rc("Nom") & vbTab txt = txt & rc("Prenom") & vbTab flex.AddItem txt rc.MoveNext Next I
Partager