bonsoir
j'ai un probleme avec se code:
quand je valide ,j'ai bien les données des textbox 1,2,3 qui vont dans les cellules A,B,C qui se mettent dans ma base par ordre alphabétique ,mais les textbox 7,8,9 se mettent bien dans les cellules D,E,F,mais à la fin se qui me décale ma base.
auriez vous une idée ?
Dim L2 As Integer
L2 = Sheets("base").Range("A65536").End(xlUp).Row + 1
With Sheets("base")
.Range("A" & L2).Value = TextBox1.Value
.Range("B" & L2).Value = TextBox2.Value
.Range("C" & L2).Value = TextBox3.Value
.Range("D" & L2).Value = TextBox7.Value
.Range("E" & L2).Value = TextBox9.Value
.Range("F" & L2).Value = TextBox8.Value
End With
merci
petchy
j'ai un probleme avec se code:
quand je valide ,j'ai bien les données des textbox 1,2,3 qui vont dans les cellules A,B,C qui se mettent dans ma base par ordre alphabétique ,mais les textbox 7,8,9 se mettent bien dans les cellules D,E,F,mais à la fin se qui me décale ma base.
auriez vous une idée ?
Dim L2 As Integer
L2 = Sheets("base").Range("A65536").End(xlUp).Row + 1
With Sheets("base")
.Range("A" & L2).Value = TextBox1.Value
.Range("B" & L2).Value = TextBox2.Value
.Range("C" & L2).Value = TextBox3.Value
.Range("D" & L2).Value = TextBox7.Value
.Range("E" & L2).Value = TextBox9.Value
.Range("F" & L2).Value = TextBox8.Value
End With
merci
petchy