cellule - ligne

bertreng

XLDnaute Nouveau
j'ai plein d'adresse mail dans une seule cellule , et j'aimerai que ces adresses soient chacune dans une cellule cellule, les unes en dessous des autres... comment faire ???

merci d'avance
 

bertreng

XLDnaute Nouveau
voici un fichier
en feuille 1 en A1 j'ai 3 adresse mail
je voudrai pouvoir avoir comme sur la feuille 2 chaque adresse dans une seule cellule

merci d'avance [file name=adressemail.zip size=1446]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/adressemail.zip[/file]
 

Pièces jointes

  • adressemail.zip
    1.4 KB · Affichages: 18

myDearFriend!

XLDnaute Barbatruc
Bonsoir bertreng, André, le Forum,

Si les adresses mails sont toujours séparées par une virgule, ci-dessous une solution par VBA :
Sub Traitement()
Dim TabTemp As Variant
Dim
L As Byte
      TabTemp = Split(Sheets('Feuil1').Range('A1').Value, ',')
      With Sheets('Feuil3')
            For L = 0 To UBound(TabTemp)
                  .Cells(L + 1, 1).Value = Trim(TabTemp(L))
            Next L
      End With
End Sub
Cordialement,
 
B

Ben

Guest
Bonjour le Forum,
Mdf,
bertreng,

Si je peux me permettre de prendre la suite de Mdf, le code tu le copies dans un module de ton fichier. et tu l'exécutes soit par outils/Macro/macro ou tu passes par un bouton.
ton résultat sera sur la feuille 3 en l'occurrence.
Bonne continuation.
 

Discussions similaires

Réponses
8
Affichages
321
Réponses
1
Affichages
289

Statistiques des forums

Discussions
312 777
Messages
2 092 031
Membres
105 156
dernier inscrit
GermainPair