{Access} une ligne de table dans champs
Résolu
Co52
Messages postés
78
Date d'inscription
Statut
Membre
Dernière intervention
-
Co52 Messages postés 78 Date d'inscription Statut Membre Dernière intervention -
Co52 Messages postés 78 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai une table comportant plusieurs champs dont un qui est une adresse mail. Je voudrais pouvoir regrouper toutes mes adresses mail dans un seul champ d'une autre table comme une liste de distribution
Exemple :
table de départ :
Table_1
Nom Mail
Toto toto@wanadoo.fr
Paul paul@sfr.fr
Pierre pierre@alice.fr
table finale :
Table_2
Mail
toto@wanadoo.fr; paul@sfr.fr; pierre@alice.fr
Cela afin de recopier ce champ en une seule fois et le recopier dans outlook ou n'importe quel autres programmes de ce genre
Merci de votre aide
J'ai une table comportant plusieurs champs dont un qui est une adresse mail. Je voudrais pouvoir regrouper toutes mes adresses mail dans un seul champ d'une autre table comme une liste de distribution
Exemple :
table de départ :
Table_1
Nom Mail
Toto toto@wanadoo.fr
Paul paul@sfr.fr
Pierre pierre@alice.fr
table finale :
Table_2
toto@wanadoo.fr; paul@sfr.fr; pierre@alice.fr
Cela afin de recopier ce champ en une seule fois et le recopier dans outlook ou n'importe quel autres programmes de ce genre
Merci de votre aide
A voir également:
- {Access} une ligne de table dans champs
- Table ascii - Guide
- Table des matières word - Guide
- Partage de photos en ligne - Guide
- Mètre en ligne - Guide
- Aller à la ligne dans une cellule excel - Guide
6 réponses
Salut,
un peu de VBA pour parcourir un recordset et créer une variable longue comme ça, avant de mettre à jour la table cible...
un peu de VBA pour parcourir un recordset et créer une variable longue comme ça, avant de mettre à jour la table cible...
Re salut blux,
C'est bien ce que j'imaginais. J'ai essayer en créant une table qu'on incrémente mail par mail en comptant le nombre d'enregistrement et en lançant une macro autant de fois que le nombre d'enregistrement mais ça me je galère au possible.
Malheureusement, comme je te l'ai expliqué dans mon post sur les liaison table dorsale/table frontale que tu m'as résolu de façon brillante, je ne mis connais pas suffisament en VBA d'où mon appel au secours.
C'est bien ce que j'imaginais. J'ai essayer en créant une table qu'on incrémente mail par mail en comptant le nombre d'enregistrement et en lançant une macro autant de fois que le nombre d'enregistrement mais ça me je galère au possible.
Malheureusement, comme je te l'ai expliqué dans mon post sur les liaison table dorsale/table frontale que tu m'as résolu de façon brillante, je ne mis connais pas suffisament en VBA d'où mon appel au secours.
un truc comme ça devrait aller :
A savoir :
- le champ d'où on récupère les données s'appelle pouet, il est dans 'table1'
- le champ qu'on met à jour s'appelle mail (il doit être de type 'mémo', car un type texte est limité à 255 car), il est dans table2, et une ligne doit exister sinon il y a 0 mise à jour
- je n'ai pas géré le dernier ; ajouté (on verra plus tard)
- si un problème survient 'incompatibilité de type', il faut aller dans 'outils/références' de la fenêtre de code et cocher 'microsoft dao 3.x library'
Dim Ad_Total As String
Dim Rs As DAO.Recordset
Dim StrSql As String
Set Rs = CurrentDb.OpenRecordset("table1")
Ad_Total = ""
Rs.MoveFirst
While Not Rs.EOF
Ad_Total = Ad_Total & Rs!pouet & ";"
Rs.MoveNext
Wend
StrSql = "UPDATE table2 SET mail = '" & Ad_Total & "';"
DoCmd.RunSQL (StrSql)
A savoir :
- le champ d'où on récupère les données s'appelle pouet, il est dans 'table1'
- le champ qu'on met à jour s'appelle mail (il doit être de type 'mémo', car un type texte est limité à 255 car), il est dans table2, et une ligne doit exister sinon il y a 0 mise à jour
- je n'ai pas géré le dernier ; ajouté (on verra plus tard)
- si un problème survient 'incompatibilité de type', il faut aller dans 'outils/références' de la fenêtre de code et cocher 'microsoft dao 3.x library'
Nickel,
c'est exactement ça que je veux. Pour le dernier ";" c'est pas bien grave. La personne qui va s'en servir pourra l'enlever manuellement s'il ne lui reste que ça a faire
Je te remercie encore pour le coup de main et si j'ai de nouveau un problème je viendrai te poser ma question
c'est exactement ça que je veux. Pour le dernier ";" c'est pas bien grave. La personne qui va s'en servir pourra l'enlever manuellement s'il ne lui reste que ça a faire
Je te remercie encore pour le coup de main et si j'ai de nouveau un problème je viendrai te poser ma question
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question