[EXCEL2010] Question sur userform
Résolu
ced3c
Messages postés
237
Date d'inscription
Statut
Membre
Dernière intervention
-
ced3c Messages postés 237 Date d'inscription Statut Membre Dernière intervention -
ced3c Messages postés 237 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- [EXCEL2010] Question sur userform
- Userform excel mac - Forum Excel
- Userform Petit ✓ - Forum VB / VBA
- Grandeur UserForm ✓ - Forum VB / VBA
- Userform vba récupérer valeur - Forum Excel
- Initialisation d'une UserForm - Forum VB / VBA
4 réponses
Merci pour ta réponse rapide
j'ai fais ce que tu m'as dit
Private Sub CommandButton1_Click()
With Sheets("Me.Combobox1")
.[B65536].End(xlUp).Offset(1, 0) = TextBox1.Value
.[C65536].End(xlUp).Offset(1, 0) = TextBox2.Value
.[D65536].End(xlUp).Offset(1, 0) = TextBox3.Value
.[E65536].End(xlUp).Offset(1, 0) = TextBox4.Value
.[F65536].End(xlUp).Offset(1, 0) = TextBox5.Value
.[G65536].End(xlUp).Offset(1, 0) = TextBox6.Value
End With
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
TextBox4 = ""
TextBox5 = ""
TextBox6 = ""
End Sub
mais il m'indique une erreur
erreur d'execution"9"
aurais tu une suggestion stp ?
j'ai fais ce que tu m'as dit
Private Sub CommandButton1_Click()
With Sheets("Me.Combobox1")
.[B65536].End(xlUp).Offset(1, 0) = TextBox1.Value
.[C65536].End(xlUp).Offset(1, 0) = TextBox2.Value
.[D65536].End(xlUp).Offset(1, 0) = TextBox3.Value
.[E65536].End(xlUp).Offset(1, 0) = TextBox4.Value
.[F65536].End(xlUp).Offset(1, 0) = TextBox5.Value
.[G65536].End(xlUp).Offset(1, 0) = TextBox6.Value
End With
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
TextBox4 = ""
TextBox5 = ""
TextBox6 = ""
End Sub
mais il m'indique une erreur
erreur d'execution"9"
aurais tu une suggestion stp ?