Recherche et ajout de données

Résolu/Fermé
Oliviercroon Messages postés 33 Date d'inscription jeudi 5 avril 2018 Statut Membre Dernière intervention 9 février 2020 - Modifié le 4 mars 2019 à 16:02
Oliviercroon Messages postés 33 Date d'inscription jeudi 5 avril 2018 Statut Membre Dernière intervention 9 février 2020 - 11 mars 2019 à 10:45
Bonjour Amis VBAtien,

je débute dans la programmation VBA, (en faite, je débute dans le début même...) et j'aurais voulu savoir si il était possible d'ajouté une donnée dans une base de données automatiquement si elle ne s'y trouve pas.
Je m'explique, j'ai une bibliothèque de BD, et j'ai crée un Userforme pour pouvoir encoder toutes mes BD sur la Feuil1, sur la feuil2, j'ai la liste des séries, des auteurs, etc dans les quelles je vais puiser pour mes différentes comboBox. Ma question est si en entrent une donnée dans les ComboBox et qu'elle ne se trouve pas dans l'une des listes de la feuil2, est-il possible de la faire mettre automatiquement?
en vous remerciant et vous souhaitant une très bonne journée

3 réponses

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
5 mars 2019 à 10:16
Bonjour,

voici un exemple à adapter:

https://www.cjoint.com/c/ICfjpJpRvnQ

1
Oliviercroon Messages postés 33 Date d'inscription jeudi 5 avril 2018 Statut Membre Dernière intervention 9 février 2020
5 mars 2019 à 17:28
merci pour le code, je vais voir pour l'adapter à mon code.
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
5 mars 2019 à 17:34
J'ai mis les saisies directement dans la ComboBox, mais tu peux ajouter une TextBox, il suffit de changer le code:

Private Sub CommandButton1_Click()
 nom = ComboBox1.Value
 For_X_to_Next_Ligne
End Sub


par

Private Sub CommandButton1_Click()
 nom = TextBox1.Value
 For_X_to_Next_Ligne
End Sub


Voilà

@+ Le Pivert
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
6 mars 2019 à 18:21
Bonjour,
Cs_le_pivert ca roule??

Oliviercroon:

Une autre facon de faire, vu que vous utilisez des plages nommees

Votre fichier modifie: https://mon-partage.fr/f/nqvgQunn/
Insertion nouvelle(s) info(s) dans plage sur validation ou fermer
J'ai fait au plus simple pour l'insertion afin d'eviter de "refaire" l'adressage les plages nommees
1
Oliviercroon Messages postés 33 Date d'inscription jeudi 5 avril 2018 Statut Membre Dernière intervention 9 février 2020
9 mars 2019 à 14:19
Un grand merci pour l'aide
0
Oliviercroon Messages postés 33 Date d'inscription jeudi 5 avril 2018 Statut Membre Dernière intervention 9 février 2020
9 mars 2019 à 14:27
Le fichier fonctionne super nickel encore un très grand merci
0
Oliviercroon Messages postés 33 Date d'inscription jeudi 5 avril 2018 Statut Membre Dernière intervention 9 février 2020
Modifié le 6 mars 2019 à 15:16
Bonjour, j'ai essayé plusieurs fois mais je comprend pas le code.
je vous joint une copie de mon fichier

https://www.cjoint.com/c/ICgooU6UPAJ

en vous remerciant

0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié le 9 mars 2019 à 17:55
Bonjour,

Si vous utilisez le fichier que j'ai modifie ca marche, que voulez-vous de plus!!!!
Le fichier que vous avez mis a dispo est l'ancien fichier!!!!!

Suite:

Petite erreur de syntaxe pour ajout auteur et j'ai modifie pour RAZ UF sans fermer et ouvrir l'UF
https://mon-partage.fr/f/AlBKDNwQ/
0
Oliviercroon Messages postés 33 Date d'inscription jeudi 5 avril 2018 Statut Membre Dernière intervention 9 février 2020
9 mars 2019 à 23:22
Petit bug sur le site, je n'ai plus poser de question et le fichier fonction très bien encore un grand merci
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
10 mars 2019 à 08:21
Bonjour,

Avez-vous regarde le code, j'ai ajoute des commentaires !!
0
Oliviercroon Messages postés 33 Date d'inscription jeudi 5 avril 2018 Statut Membre Dernière intervention 9 février 2020 > f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024
11 mars 2019 à 10:45
merci ça marche super bien
0