enregistrer une seule feuille d un classeur vers un dossier

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

submarine22

XLDnaute Junior
Bonjour à tous.
Après plusieurs recherche je n y arrive toujours pas.......
quelqu'un aurais t il une idée pour pouvoir enregistrer, à partir d'un bouton dans un userform, une seule feuille d un classeur(ex: Feuil3) vers un dossier sous "C" et lui donner comme nom les valeurs de plusieurs cellule.
Merci par avance
Et un très bon week-end rallongé à tous
 
Re : enregistrer une seule feuille d un classeur vers un dossier

salut moi g ca si ca peu t aider.

Sub Enregistrer_PDF()
'
' Enregistrer_pdf macro
'
'
Dim fichier As String
fichier = "D:\mes documents\" & [E9].Value & "_" & [e18].Value
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=fichier, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
ignorePrintAreas:=False, OpenAfterPublish:=True
End Sub
 
Re : enregistrer une seule feuille d un classeur vers un dossier

bon et bien non encore malheureusement je suis désoler il beug toujours sur le PDF et je pense que cela vient de la et de la version que j utilise de excel ou pdf .
Merci quand même pour ton aide
 
Re : enregistrer une seule feuille d un classeur vers un dossier

la ca marche chez moi en exel change ton chemin (genre comme moi vers t documents )

Sub Enregistrer_PDF()
'


' Enregistrer au format Excel


Dim fichier As String
fichier = "D:\mes documents\" & [E9].Value & "_" & [e18].Value
ActiveSheet.Copy
With ActiveWorkbook
Application.DisplayAlerts = False
.SaveAs fichier & "xlsx"
.Close
Application.DisplayAlerts = False
End With
End Sub
 
- 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

Réponses
5
Affichages
742
Retour