Avoir un Filname variable avec VBA Excel
Résolu/Fermé
Busimax09
Messages postés
31
Date d'inscription
mercredi 22 février 2012
Statut
Membre
Dernière intervention
25 janvier 2013
-
17 mai 2012 à 15:30
Busimax09 Messages postés 31 Date d'inscription mercredi 22 février 2012 Statut Membre Dernière intervention 25 janvier 2013 - 21 mai 2012 à 18:51
Busimax09 Messages postés 31 Date d'inscription mercredi 22 février 2012 Statut Membre Dernière intervention 25 janvier 2013 - 21 mai 2012 à 18:51
A voir également:
- Vba enregistrer sous chemin variable
- Audacity enregistrer son pc - Guide
- Enregistrer en pdf - Guide
- Comment enregistrer une video youtube - Guide
- Comment enregistrer une musique sur youtube en mp3 - Guide
3 réponses
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 257
17 mai 2012 à 17:20
17 mai 2012 à 17:20
Bonjour,
chemin="D:\tmp\"
' nom du fichier en A1
... Filename:= chemin & A1 & ".pdf", ...
eric
chemin="D:\tmp\"
' nom du fichier en A1
... Filename:= chemin & A1 & ".pdf", ...
eric
Busimax09
Messages postés
31
Date d'inscription
mercredi 22 février 2012
Statut
Membre
Dernière intervention
25 janvier 2013
21 mai 2012 à 13:39
21 mai 2012 à 13:39
Bonjour,
Lorsque j'ajoute votre formule dans mon module VBA, l'enregistrement se fait toujours au dessus du précédent...
Lorsque j'ajoute votre formule dans mon module VBA, l'enregistrement se fait toujours au dessus du précédent...
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 257
21 mai 2012 à 13:45
21 mai 2012 à 13:45
Bonjour,
en clair ça veut dire ?
en clair ça veut dire ?
Busimax09
Messages postés
31
Date d'inscription
mercredi 22 février 2012
Statut
Membre
Dernière intervention
25 janvier 2013
21 mai 2012 à 14:02
21 mai 2012 à 14:02
Et bien j'ai créer un bouton "enregistrer" auquel j'ai affecté la macro.
Après Filename, j'ai écrit le nom de la cellule dont je souhaite que le contenu serve de nom pour le fichier.
Mais l'enregistrement se fait toujours sous le nom du classeur et pas sous le nom de la cellule
Après Filename, j'ai écrit le nom de la cellule dont je souhaite que le contenu serve de nom pour le fichier.
Mais l'enregistrement se fait toujours sous le nom du classeur et pas sous le nom de la cellule
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 257
21 mai 2012 à 15:13
21 mai 2012 à 15:13
oui, excuse moi j'avais été un peu vite sur la syntaxe :
..., Filename:="D:\tmp\" & [A1] & ".xls", ....
ex:
ActiveWorkbook.SaveAs Filename:="D:\tmp\" & [A1] & ".xls"
eric
..., Filename:="D:\tmp\" & [A1] & ".xls", ....
ex:
ActiveWorkbook.SaveAs Filename:="D:\tmp\" & [A1] & ".xls"
eric
Busimax09
Messages postés
31
Date d'inscription
mercredi 22 février 2012
Statut
Membre
Dernière intervention
25 janvier 2013
21 mai 2012 à 15:29
21 mai 2012 à 15:29
Sub Macro1()
'
' Macro1 Macro
'
'
ChDir "C:\Users\christophe\Desktop"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="D:\tmp\"&[B13] _
"C:\Users\christophe\Desktop\CONTRAT_LOCATION.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub
Voilà la macro...
La sauvegarde ne fonctionne pas
'
' Macro1 Macro
'
'
ChDir "C:\Users\christophe\Desktop"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="D:\tmp\"&[B13] _
"C:\Users\christophe\Desktop\CONTRAT_LOCATION.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub
Voilà la macro...
La sauvegarde ne fonctionne pas
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 257
21 mai 2012 à 17:50
21 mai 2012 à 17:50
C'est sûr que si tu mélanges mon répertoire et le tien ça ne va pas marcher...
Filename:="C:\Users\christophe\Desktop\ & [B13] & ".pdf"
avec en B13 de la feuille active le nom du fichier : CONTRAT_LOCATION
Si la feuille risque de ne pas être active alors :
Filename:="C:\Users\christophe\Desktop\ & [Feuil1!B13] & ".pdf"
eric
Filename:="C:\Users\christophe\Desktop\ & [B13] & ".pdf"
avec en B13 de la feuille active le nom du fichier : CONTRAT_LOCATION
Si la feuille risque de ne pas être active alors :
Filename:="C:\Users\christophe\Desktop\ & [Feuil1!B13] & ".pdf"
eric
Busimax09
Messages postés
31
Date d'inscription
mercredi 22 février 2012
Statut
Membre
Dernière intervention
25 janvier 2013
21 mai 2012 à 18:51
21 mai 2012 à 18:51
En effet c'est pas malin.
Et bien je vous remercie mon problème est désormais résolu!
Maxime
Et bien je vous remercie mon problème est désormais résolu!
Maxime