[Macro] changer l'onglet actif

K

kika

Guest
Bonjour,
J'ai un fichier excel avec deux onglet. Lorsque je ferme mon fichier j'ai fait une macro qui prends des infos de 1er onglet pour les mettre dans le deuxieme : pour ca pas de pb.
Par contre je voudrais que mon deuxiéme onglet soit enregistrer en .csv
Le seul code que j'ai trouvé m'enregistre le premier onglet, je ne vois pas comment faire.

Code:
 Private Sub Workbook_BeforeClose(Cancel As Boolean)

modif

ActiveWorkbook.SaveAs Filename:='toto.csv', FileFormat:=xlCSV

End Sub

Merci
 

Abel

XLDnaute Accro
Bonjour kika,

Une solution, copie l'onglet dans un nouveau classeur avant de l'enregistrer.

Code:
    Sheets('Feuil1').Select
    Sheets('Feuil1').Copy
    ActiveWorkbook.SaveAs Filename:= _
        'C:\\Fichiers\\Divers\\Perso\\Divers\\Forum\\toto.csv', FileFormat:=xlCSV, _
        CreateBackup:=False
    ActiveWindow.Close 'pour fermer la fenêtre du classeur .csv


En espérant que cela te dépanne.


Abel.
 

Discussions similaires

Statistiques des forums

Discussions
312 330
Messages
2 087 342
Membres
103 524
dernier inscrit
Smile1813