COMBOBOX
Fermé
Inocent.k
Messages postés
4
Date d'inscription
jeudi 16 mars 2017
Statut
Membre
Dernière intervention
17 mars 2017
-
16 mars 2017 à 15:20
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 - 17 mars 2017 à 21:20
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 - 17 mars 2017 à 21:20
2 réponses
f894009
Messages postés
17185
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
15 avril 2024
1 701
16 mars 2017 à 20:11
16 mars 2017 à 20:11
Bonjour,
Faudrait expliquer un peu plus votre problème et montrer votre code
Faudrait expliquer un peu plus votre problème et montrer votre code
f894009
Messages postés
17185
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
15 avril 2024
1 701
17 mars 2017 à 13:11
17 mars 2017 à 13:11
Bonjour,
Si vous n'avez pas change le nom des TextBox, la solution est dans ce que je viens d'ecrire et ce n'est pas .tex mais .Text
Si vous n'avez pas change le nom des TextBox, la solution est dans ce que je viens d'ecrire et ce n'est pas .tex mais .Text
Inocent.k
Messages postés
4
Date d'inscription
jeudi 16 mars 2017
Statut
Membre
Dernière intervention
17 mars 2017
17 mars 2017 à 20:01
17 mars 2017 à 20:01
Merci F894009 pour ta réponse
mais, maintenant Erreur définie par l’application ou par l'objet
mais, maintenant Erreur définie par l’application ou par l'objet
f894009
Messages postés
17185
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
15 avril 2024
1 701
>
Inocent.k
Messages postés
4
Date d'inscription
jeudi 16 mars 2017
Statut
Membre
Dernière intervention
17 mars 2017
17 mars 2017 à 20:04
17 mars 2017 à 20:04
Re,
Sur quelle ligne?
Sur quelle ligne?
Inocent.k
Messages postés
4
Date d'inscription
jeudi 16 mars 2017
Statut
Membre
Dernière intervention
17 mars 2017
17 mars 2017 à 20:23
17 mars 2017 à 20:23
bon quand je click sur debloquer
on selectionne ce qui suit en jaune
Insuv = [A1000].End(xIUp).Row + 1
aussi quand je fais passé le cursseur sur toutes les cellues, on me met Erreur définie par l’application ou par l'objet
on selectionne ce qui suit en jaune
Insuv = [A1000].End(xIUp).Row + 1
aussi quand je fais passé le cursseur sur toutes les cellues, on me met Erreur définie par l’application ou par l'objet
f894009
Messages postés
17185
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
15 avril 2024
1 701
>
Inocent.k
Messages postés
4
Date d'inscription
jeudi 16 mars 2017
Statut
Membre
Dernière intervention
17 mars 2017
17 mars 2017 à 21:20
17 mars 2017 à 21:20
Re,
Pas d'erreur chez moi;
Par contre une fois Insuv = [D1000].End(xlUp).Row + 1 , Insuv = [D29].End(xlUp).Row + 1 sur l'image er enfin Insuv = [A1000].End(xlUp).Row + 1
Faudrait vous fixez
Pas d'erreur chez moi;
Par contre une fois Insuv = [D1000].End(xlUp).Row + 1 , Insuv = [D29].End(xlUp).Row + 1 sur l'image er enfin Insuv = [A1000].End(xlUp).Row + 1
Faudrait vous fixez
Modifié par Inocent.k le 17/03/2017 à 11:37
La première question à été résolue
mais voici mon prochain problème :
Private Sub CommandButton1_Click()
Sheets("GESTION").Activate
Dim Insuv As Integer
Insuv = [D1000].End(xlUp).Row + 1
Cells(Insuv, 4) = texBox1.Tex
Cells(Insuv, 5) = texBox2.Tex
Cells(Insuv, 7) = DateValue(texBox3.Value & "/" & texBox4.Value & "/" & texBox5.Value)
Cells(Insuv, 9) = texBox6.Tex
Cells(Insuv, 6) = texBox7.Tex
End Sub