Passer de 2 lignes à 2 colonnes

Bonjour à tous,

Voilà j'ai un fichier assez important que je souhaiterai retravailler au niveau de la forme.

exemple :

Dans ce fichier je souhaiterai trouver une astuce pour mettre les adresse mails qui sont sous les noms dans une nouvelle colonne.

Comment faire ?

Merci d'avance de vos réponses !

Sébastien

Bonjour et bienvenue,

en Colonne D par exemple ? si elle est libre ?

combien de lignes a le fichier ?

Amicalement

Claude.

En colonne D en effet et mon fichier fait 1000 lignes environ, tu vois pourquoi je souhaite trouver quelque chose d'automatique.

Merci de ton aide

Sébastien

Bonjour Claude, Sébastien, le forum...

Deux petites manip et le tour est joué.

En colonne D, tu tapes la formule :

=A15 (si tu est en D14) A adapter...

Tu sélectionnes les cellules D14 et D15 (vide) et tu recopies vers le bas sur les 1000 et quelques lignes : normalement, tu recopies la formule 1 ligne sur 2.

Puis tu copies la colonne D, ensuite tu fais collage spécial - valeurs au même endroit.

Il ne reste plus qu'à faire un tri sur la colonne D, pour pouvoir regrouper toutes les lignes à supprimer.

Cordialement,

... quand je fais un coller "valeurs", il me met que des "0"

Merci pour la manip, elle est simple, mais géniale !!!

Sébastien

re,

colle ce code dans un module

Sub Colonne4()
''Macros par Claude Dubois pour "sbouleau" Excel-Pratique le 8 Août 09
Dim Lg As Integer, i As Integer
Lg = Range("A65536").End(xlUp).Row
Application.ScreenUpdating = False
    For i = 2 To Lg Step 2
        Range("a" & i).Offset(1, 0).Cut Destination:=Range("a" & i).Offset(0, 3)
    Next i
Range("a2:a" & Lg).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub

Salut V_Elbie

Bonne journée

Claude.

Super et merci

Sébastien

plus qu'à mettre en résolu ...