Créer un csv

Bonjour,

Pour télécharger mon carnet d'adresse, je dois créer un .csv.

J'ai pu rapatrier un carnet d'adresse depuis google en .csv, utiliser la fonction convertir pour séparer les données en colonne, puis faire le ménage dans Excel.

Ce que je n'arrive pas à faire, c'est le contraire : transformer mon tableau en csv. Je croyais qu'il suffisait d'enregistrer sous, et de choisir .csv. Que nenni, ce choix n'est pas proposé ?

Alors, comment faire ?

Merci pour votre aide.

Si si, il te suffit simplement de faire enregistrer sous puis de choisir le format .csv...

Quel version de excel a tu ?

quel c.... (moi) !

Le choix csv est bien proposé, mais il faut faire descendre l’ascenseur !

Merci de m'avoir guidé cependant.

41BJP a écrit :

quel c.... (moi) !

Le choix csv est bien proposé, mais il faut faire descendre l’ascenseur !

Merci de m'avoir guidé cependant.

Héhé... Sa arrive.

C'était un plaisir. N'oublie pas de signaler que ton problème est résolut en cliquant sur le "V" en haut de ton premier message.

oui enfin, c'est pas gagné....

Je sauvegarde bien sous .csv, mais le fichier est toujours en plusieurs colonnes !

Bonjour,

Une solution "radicale"

Sub Export()
Dim Plage As Object, oL As Object, oC As Object, FileN$, Sep$, Tmp$
FileN = "MonBeauCSV" 'A redéfinir
Sep = ";"
With Worksheets(1)
    Set Plage = .Range("A1:A5") 'A définir en fonction de la plage à enregistrer
End With
Open FileN & ".csv" For Output As #1
    For Each oL In Plage.Rows
        Tmp = ""
        For Each oC In oL.Cells
            Tmp = Tmp & CStr(oC.Text) & Sep
        Next
        Print #1, Tmp
    Next
Close
End Sub

A+