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
45
Affichages
1 K

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 294
Messages
2 086 896
Membres
103 404
dernier inscrit
sultan87