RESOLU enregistrer sous pour le 2ème onglet Merci 00

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 !

grisan29

XLDnaute Accro
bonjour a tous et toutes
je voudrais enregistrer un onglet (feuille) mais tout ce que je trouve est pour la feuille active
mon soucis a partir d'userform je voudrais lancer la sauvegarde du 2ème onglet sous C;
mais cet onglet aura un nom au lieu de feuil2
oublier de préciser que cet onglet n'auras pas toujours le même nom
voir l'exemple si m'explique pas bien
je trouve des codes mais plus pour l'activesheets
 

Pièces jointes

  • onglet.jpg
    onglet.jpg
    40.1 KB · Affichages: 29
Dernière édition:
Bonjour, grisan29, le Forum,

Comme ceci ?
VB:
Option Explicit
Sub Onglet_2_enregistrer()
    On Error Resume Next    ' si enregistrement refusé
    Feuil2.Copy
    ' emplacement adapter
        ActiveWorkbook.SaveAs Filename:="C:\Users\00\Downloads\" & Feuil2.Name & ".xlsm", _
        FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
    ActiveWindow.Close
End Sub
A bientôt 🙂
 
Re-bonjour,
... c'est a fait cela sauf que la macro demande ou enregistrer

😱 ?

Sur mon poste, nul besoin de préciser le lieu d'enregistrement car il est mentionné dans le code.

Cette ligne a-t-elle été adaptée ?
VB:
    ' emplacement adapter
       ActiveWorkbook.SaveAs Filename:="C:\Users\00\Downloads\" & Feuil2.Name & ".xlsm", _
        FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
A bientôt 🙂
 
- 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

B
Réponses
0
Affichages
1 K
B
B
Réponses
1
Affichages
2 K
B
Réponses
2
Affichages
2 K
B
Réponses
1
Affichages
43 K
Compte Supprimé 979
C
Retour