nommer une image exporter

  • Initiateur de la discussion Initiateur de la discussion Phil39
  • 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 !

Phil39

XLDnaute Occasionnel
Bonsoir,

avec beaucoup de peine et grace à de nombreux tutoriaux, je suis enfin parvenu à imprimer puis à exporter un userform en PDF pour une sauvegarde (en Excel 2007).
D'ailleurs si quelqu'un veux le code, je le mettrais même s'il n'est pas de moi et probablement risible pour les Pros.

Je butte sur un dernier petit truc : le nom de mon fichier sauvegardé.

Je souhaite donner comme nom au fichier Date du Jour + le nom de mon userform (le userform1.Caption)

j'ai bien compris (car ça marche !) que je devais écrire :

Pict.Name = Format(Now, "dd-mmm-yyyy")

mais je butte sur la suite.

Si je fais :

Pict.Name = Format(Now, "dd-mmm-yyyy") & userform1.caption

j'ai un beau message m'indiquant que le fichier n'est pas enregistré grâce à la ligne :

.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ThisWorkbook.Path & "\" & Pict.Name & ".pdf"

Un petit peu d'aide svp...
 
Re : nommer une image exporter

Bonjour phil,

essaie en supprimant ce qui est en rouge car le type est défini ( XlTypePDF)

.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ThisWorkbook.Path & "\" & Pict.Name & ".pdf" Attention: ne pas supprimer le dernier guillemet

à+
Philippe
.
 
Re : nommer une image exporter

Bonjour phil,

essaie en supprimant ce qui est en rouge car le type est défini ( XlTypePDF)

.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ThisWorkbook.Path & "\" & Pict.Name & ".pdf" Attention: ne pas supprimer le dernier guillemet

à+
Philippe
.

Merci.

le texte en rouge est utilisé pour ensuite rechercher le fichier et le mettre en piece jointe dans un mail automatique.
Chose étonnante, si je ne met pas ça, Excel ne trouve pas le fichier...
 
- 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

Discussions similaires

  • Question Question
Microsoft 365 Exit sub save As
Réponses
3
Affichages
729
Réponses
4
Affichages
752
Retour