Discussion :

[bastos77]

voici mon bout de code , lorsque je click sur le bouton de la form2 je voudrais que les données j'ajoute a une nouvelle ligne et me modifie pas la precedente car c 'est le cas actuellement, si vous avez des explication je suis preneur.

merci d'avance.

"grille etant mon msflexgrid qui est situer sur la form1"

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
Private Sub Command1_Click()
Dim i As Integer
 
i = 1
For i = 1 To 1
 
Form1.grille.Rows = Form1.grille.Rows + 1
Form1.grille.Row = i
 
Form1.grille.TextMatrix(i, 1) = Text1.Text "test des 2 system colonne et ligne"
Form1.grille.Col = 2
Form1.grille.Text = txtCode.Text
Form1.grille.Col = 3
Form1.grille.Text = txtlib.Text
Form1.grille.Col = 4
Form1.grille.Text = txtQuantité.Text
Form1.grille.Col = 5
Form1.grille.Text = txtPTTC.Text
Form1.grille.Col = 7
Form1.grille.Text = Me.txtQuantité.Text * Me.txtPTTC.Text
 
Next i
i = i + 1
End Sub

[Delbeke]

Heu, as tu tracé l'evolution de variable i ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
i =1
for i=1 to 1

i vaudra toujours 1
ensuit tu fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Form1.grille.Row = i

donc tu utilises toujours le row 1, lol

[bastos77]

je te remercie j'avais pas fais attention, je sais pas si cela est la bonne manière de faire mais ca fonction

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
Dim i As Integer
Dim t As Integer
 
i = 1
t = Form1.grille.Row + 1
 
Form1.grille.AddItem " ", t
 
Form1.grille.Row = 0
 
 
Form1.grille.TextMatrix(t, 1) = Text1.Text
Form1.grille.TextMatrix(t, 2) = txtCode.Text
Form1.grille.TextMatrix(t, 3) = txtlib.Text
Form1.grille.TextMatrix(t, 4) = txtQuantité.Text
Form1.grille.TextMatrix(t, 5) = txtPTTC.Text
Form1.grille.TextMatrix(t, 7) = Me.txtQuantité.Text * Me.txtPTTC.Text

excuse moi t'avoir répondu tardivement.

merci encore

j'ai oublier d'enlever i (qui est inutile) que j'ai remplacer par t.