Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Lancer la boîte "Enregistrer sous"

Lancer la boîte "Enregistrer sous"

5 réponses
Avatar
Michel
Bonsoir
Je désire pouvoir lancer la boîte enregistrer sous...
Merci beaucoup
Michel
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jerem
Bonsoir,

Voici le code de cette boîte

ActiveWorkbook.Save

Cdlt





"Michel" a écrit dans le message de news:

Bonsoir
Je désire pouvoir lancer la boîte enregistrer sous...
Merci beaucoup
Michel



Avatar
Daniel
Bonsoir.
Application.Dialogs(xlDialogSaveAs).Show
Cordialement.
Daniel
"Michel" a écrit dans le message de news:

Bonsoir
Je désire pouvoir lancer la boîte enregistrer sous...
Merci beaucoup
Michel



Avatar
RaMa
Bonsoir

au choix

MonFic = Application.GetSaveAsFilename
ou
Application.Dialogs(xlDialogSaveAs).Show

Salutations
RaMa

"Michel" a écrit dans le message de news:

Bonsoir
Je désire pouvoir lancer la boîte enregistrer sous...
Merci beaucoup
Michel



Avatar
Jerem
desole erreur de code



"Michel" a écrit dans le message de news:

Bonsoir
Je désire pouvoir lancer la boîte enregistrer sous...
Merci beaucoup
Michel



Avatar
Michel
Merci beaucoup à tous
Bonne soirée
Michel

"Jerem" a écrit dans le message de news:
%
desole erreur de code



"Michel" a écrit dans le message de news:

Bonsoir
Je désire pouvoir lancer la boîte enregistrer sous...
Merci beaucoup
Michel