Copier une liste de mails de Word à ExcelFermé

Question

Bonjour,

J'ai une liste de 2000 e-mails inscrits les uns à la suite des autres sur Word organisés de cette manière : fzfzef@fgz.com, rgerger@vsgz.com, ggg@sgsez.com,...

J'aimerais transférer ces mails dans un fichier Excel sous forme d'une seule colonne avec une seule adresse e-mail par ligne. Comment puis-je procéder?

Merci beaucoup pour votre aide!

Axel

jejelefou · Accepted Answer

Bonjour

La procedure est longue mais réalisable :
Tout d'abord, il faudrait que t'arrive à mettre à la ligne de temps en temps (pas plus de 256 @-email de suite).

Ensuite en copier/coller, tu crées un fichier xxxx.txt que tu enregistre.

Ensuite tu ouvres un fichier excel.
Données/Données externes/importer des données
Tu vas chercher ton fichier

cliquer sur Délimité
suivant

Cliquer sur virgule et espace
suivant
suivant
Terminer

Mettre en A1

Si tout c'est bien passé, a ce stade vous devez avoir séparé toutes les adresses dans des cellule differentes.

Maintenant un peu de VB
Le code ci dessous va mettre les 20 premieres lignes sur 1 seule colonne à partir de  A21
S'il faut plus de ligne, a vous de modifier le code


Sub copieadresse()
compteur = 21
For i = 1 To 20
For j = 1 To 256
If Cells(i, j).Value <> "" Then
Cells(compteur, 1).Value = Cells(i, j).Value
compteur = compteur + 1
End If
Next
Next
End Sub


Bon courrage

jejelefou · Answer

Super,

N'oublie pas de cloturer le post et à une prochaine fois

jéjé

Bernard Rey · Answer

jejelefou :
.../... Maintenant un peu de VB 
Le code ci dessous va mettre les 20 premieres lignes sur 1 seule colonne à partir de A21 
S'il faut plus de ligne, a vous de modifier le code.../... 

Sauf erreur, à partir de ce point on peut aussi continuer sans VBA (par exemple pour ceux qui auraient Excel 2008, mais pas seulement), en copiant les cellules A1 jusqu'au bout (combinaison Majuscule-Contrôle-Flèche à droite, puis Commande-C et en faisant ensuite un "Collage spécial..." (menu "Édition") en cochant la case "Transposé"...


-- 
Bernard

Bernard Rey · Answer

pacey8heures :
malheureusement, ça ne fonctionne pas... J'ai un message qui s'affiche me disant que cette sélection n'est pas valide

Avant de faire un "Collage spécial..." > "Transposé", il faut sélectionner une nouvelle cellule, en dehors de la sélection précédente. Si par exemple tes adresses se trouvent sur la ligne 1 (donc commençant en A1) il te faut sélectionner par exemple A2 avant de coller. Est-ce bien le cas dans ton essai ? Sinon, que dit précisément le message d'erreur (en plus de ce que tu as déjà cité) ?

pilottomcat · Answer

moi ma question .... : jai les adresse postal de tous mes clients dans excel comment faire pour transposer ca sous forme d'etiquette collante dans office 2007 ou sous forme imprimer sur des envelloppe toujours en utilisant outlook 2007 ?

pilottomcat@mailcity.com

Bernard Rey · Answer

pilottomcat :

j'ai les adresses postales de tous mes clients dans excel, comment faire pour transposer ca sous forme d'etiquettes collantes dans office 2007 ou sous forme imprimée sur des enveloppes toujours en utilisant outlook 2007 ?

Dans la mesure où on est ici sur le forum dédié Macintosh, tu t'es peut-être trompé d'endroit. Mais, ceci dit, je présume qu'il en va d'Office sous Windows comme d'Office pour Mac : ce que tu demandes se fait dans Word, par une fusion - ou publipostage, le nom varie un peu selon les versions - et l'assistant te permet de faire ça en quatre ou cinq clics. 

Le mieux est probablement de te reporter à l'aide (c'est une opération assez banale) ou sinon, de poser la question sur un forum Windows où tu trouveras plus facilement des utilisateurs d'Office 2007...

Copier une liste de mails de Word à Excel

6 réponses

Discussions similaires

Newsletters