Formulaire et recherchev
Résolu/Fermé
Bourrique66
Messages postés
158
Date d'inscription
mardi 2 juin 2015
Statut
Membre
Dernière intervention
25 septembre 2023
-
24 août 2015 à 11:39
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 - 25 août 2015 à 00:02
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 - 25 août 2015 à 00:02
A voir également:
- Formulaire et recherchev
- Formulaire de réclamation facebook - Guide
- Récupérer compte hotmail sans formulaire ✓ - Forum Hotmail / Outlook.com
- Civilité sur un formulaire - Forum VB / VBA
- Compte hotmail bloqué ✓ - Forum Hotmail / Outlook.com
- Formulaire rempli - Guide
8 réponses
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
523
24 août 2015 à 13:19
24 août 2015 à 13:19
Bonjour,
Essaie comme cela :
A+
Essaie comme cela :
Private Sub Valider_les_données_Click()
Dim L As Integer
With Sheets("Lavage")
L = .Range("A" & Rows.Count).End(xlUp).Row + 1
'Permet de se positionner sur la dernière ligne de tableau NON VIDE
.Range("A" & L).Value = CInt(TextBox1.Value) 'Insère la donnée de la liste déroulante dans la colonne A
.Range("B" & L).Value = TextBox2.Value 'Insère la donnée de la textbox1 dans la colonne B
'et à suivre....
.Range("I" & L).Value = ComboBox8
.Range("T" & L).Value = ComboBox128.Value
.Range("AR" & L).Value = TextBox3.Value
Unload Me
Lavage.Show vbModeless
End With
End Sub
A+
Bourrique66
Messages postés
158
Date d'inscription
mardi 2 juin 2015
Statut
Membre
Dernière intervention
25 septembre 2023
2
24 août 2015 à 13:44
24 août 2015 à 13:44
Bonjour,
Je me suis mal expliquer, mon formulaire marche bien ,sauf la combibox code qui une fois remplie et valider devrait déclencher une recherchev dans le tableau et remplir ainsi les colonnes blanches les jaunes étant remplie par le formulaire .En espérant être un peu plus claire
Je me suis mal expliquer, mon formulaire marche bien ,sauf la combibox code qui une fois remplie et valider devrait déclencher une recherchev dans le tableau et remplir ainsi les colonnes blanches les jaunes étant remplie par le formulaire .En espérant être un peu plus claire
Le Pingou
Messages postés
12140
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
18 septembre 2024
1 446
24 août 2015 à 17:25
24 août 2015 à 17:25
Bonjour,
Quelle commande ouvre votre formulaire de saisie...?
Quelle commande ouvre votre formulaire de saisie...?
Bourrique66
Messages postés
158
Date d'inscription
mardi 2 juin 2015
Statut
Membre
Dernière intervention
25 septembre 2023
2
24 août 2015 à 17:34
24 août 2015 à 17:34
Bonjour,
Le formulaire s'ouvre tout seul à l'ouverture de la feuille de calcul,il suffit d'activer les macros et pour le tableau une fois le formulaire ouvert il faut faire "afficher les données"
Le formulaire s'ouvre tout seul à l'ouverture de la feuille de calcul,il suffit d'activer les macros et pour le tableau une fois le formulaire ouvert il faut faire "afficher les données"
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Le Pingou
Messages postés
12140
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
18 septembre 2024
1 446
24 août 2015 à 18:01
24 août 2015 à 18:01
Bonjour,
Merci, mais ce n'est pas le cas, elle s'ouvre avec l'ouverture du classeur ce qui est différent.
Je pense que le problème vient des valeurs de la colonne [Code] de la feuille [BDD Lavage 2] qui sont une fois nombre et une fois texte ... !
Merci, mais ce n'est pas le cas, elle s'ouvre avec l'ouverture du classeur ce qui est différent.
Je pense que le problème vient des valeurs de la colonne [Code] de la feuille [BDD Lavage 2] qui sont une fois nombre et une fois texte ... !
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
523
24 août 2015 à 18:10
24 août 2015 à 18:10
Re-bonjour,
As-tu testé la solution proposée ?
https://www.cjoint.com/c/EHyqjO5kObv
A+
As-tu testé la solution proposée ?
https://www.cjoint.com/c/EHyqjO5kObv
A+
Le Pingou
Messages postés
12140
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
18 septembre 2024
1 446
24 août 2015 à 22:50
24 août 2015 à 22:50
Bonjour Gyrus,
Juste petit détail si j'entre le code 212 D j'obtiens une erreur sur la ligne [.Range("A" & L).Value = CInt(TextBox1.Value)] en fait c'est normal puisque c'est un code de type texte... !
Salutations.
Le Pingou
Juste petit détail si j'entre le code 212 D j'obtiens une erreur sur la ligne [.Range("A" & L).Value = CInt(TextBox1.Value)] en fait c'est normal puisque c'est un code de type texte... !
Salutations.
Le Pingou
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
523
>
Le Pingou
Messages postés
12140
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
18 septembre 2024
25 août 2015 à 00:02
25 août 2015 à 00:02
Bonjour Le Pingou,
Effectivement, je n'avais pas prêté attention à ces codes de type texte.
A+
Effectivement, je n'avais pas prêté attention à ces codes de type texte.
A+
Le Pingou
Messages postés
12140
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
18 septembre 2024
1 446
24 août 2015 à 22:06
24 août 2015 à 22:06
Bonjour,
Pour prendre en compte les différents type de code je vous propose de modifier la procédure [Private Sub Valider_les_données_Click()] ;
Remplacer la ligne :
Par celles-ci :
Pour prendre en compte les différents type de code je vous propose de modifier la procédure [Private Sub Valider_les_données_Click()] ;
Remplacer la ligne :
Range("A" & L).Value = TextBox1 'Insère .......... A
Par celles-ci :
If IsNumeric(TextBox1.Value) Then
Range("A" & L).Value = CInt(TextBox1.Value)
Else
Range("A" & L).Value = TextBox1.Value 'Insère ..... A
End If
Bourrique66
Messages postés
158
Date d'inscription
mardi 2 juin 2015
Statut
Membre
Dernière intervention
25 septembre 2023
2
24 août 2015 à 22:29
24 août 2015 à 22:29
Bonsoir,
Je viens de tester votre code et tout marche parfaitement même avec un code avec texte et chiffre. Un grand merci car vous êtes des pros et toujours rapide dans vos réponses ,merci encore
Je viens de tester votre code et tout marche parfaitement même avec un code avec texte et chiffre. Un grand merci car vous êtes des pros et toujours rapide dans vos réponses ,merci encore