Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro Enregistrer sous

  • Initiateur de la discussion Initiateur de la discussion Cobbalt
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

C

Cobbalt

Guest
Bonjour,

Voila j'aimerai pouvoir sauvergarder un fichier Excel par macro, dans un répertoire défini (C:/Conditions client 2011/) et dont le nom du fichier serait :
CC & cellule C4 (code client) & cellule E4 (nom du client). Ce qui donnerait un fichier nommé comme ceci par exemple : CC 91160000 M.Dupond.xls

Voila je vous remercie d'avance pour votre aide, j'écume internet depuis + d'une heure et je ne trouve rien qui marche...
 
Re : Macro Enregistrer sous

Oui j'ai trouvé, merci beaucoup pour le coup de main.

J'ai une autre question concernant cette fois ci l'envoi d'une feuille du fichier Excel en format PDF.
J'ai enregistré la macro qui me donne ca

Code:
Sub Pdf_files()
'
' Pdf_files Macro
'

'
    ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Users\com-dno\AppData\Local\Temp\calculette generique PHM v5.pdf", Quality _
        :=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=False _
        , OpenAfterPublish:=False
End Sub

Mais voila il me met la totalité du fichier, alors que je voudrai que la feuille n°2. j'ai essayé différents truc mais ca ne marche pas..
 
Re : Macro Enregistrer sous

Bonjour,

il faut faire une copie de la feuille en question, de ce fait un nouveau classeur est créé (qui est actif) et enregistrer / exporter ce classeur...

Code:
ActiveSheet.Copy
    ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Users\com-dno\AppData\Local\Temp\calculette generique PHM v5.pdf", Quality _
        :=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=False _
        , OpenAfterPublish:=False
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
11
Affichages
712
Réponses
26
Affichages
2 K
Réponses
3
Affichages
645
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…