Enregistrer sous , incriminer le formal xlsm

CEMOI -  
 CEMOI -
Bonjour,

Avant d'ouvrir une discussion sur ce sujet, j'ai regarder les autres discussions mais je n'ai pas trouvé ce qui fonctionne pour mon dossier :
J'ai une dossier comprenant 120 feuilles,
j'ai crée une macro afin de séparer 30 de ces feuilles et enregistrer le dossier dans un dossier avec un chemin bien spécifique. Jusque la cela fonctionne.
En revanche, alors que mon dossier est en xlsm, le format proposé est xls.
Je souhaiterai que le format soit en xlsm pour le dossier qui va être, les personnes utilisant ce dossier n'auront plus qu'a le nommer et cela évitera les erreurs lors de l'enregistrement.

Voici code que j'ai utilisé à la suite de la macro de la séparation de mes feuilles dans un nouveau dossier:

Application.Dialogs(xlDialogSaveAs).Show ("A:\PLUTO\ TOTO\2020")

J'ai testé pas mal de chose, mais la fenêtre "enregistrer sous" s'ouvre au bon endroit mais le format reste xls.

Merci pour l'aide que vous pourrez m'apporter.
A voir également:

4 réponses

Réponse 1 / 4
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

dérouler le menu Type
0
Réponse 2 / 4
CEMOI
 
Bonjour .
Merci pour votre retour.
Pouvez vous m’en dire plus..?
Car j’ai j’ai tenté Xl fileType .... sans réussite !!
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Il faut choisir l'extension dans le menu déroulant Type comme ceci:



@+
0
Réponse 3 / 4
CEMOI
 
Cela je le sais !!!
Peut-être me suis-je mal expliquée?
Je souhaiterai que ce choix soit fait directement pas ma macro.
Puis l’utilisateur lui donnerai le nom
approprié.
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
comme ceci: 

Sub test()
Application.Dialogs(xlDialogSaveAs).Show ("A:\PLUTO\ TOTO\2020"), 52
End Sub


@+ Le Pivert
0
Réponse 4 / 4
CEMOI
 
Merci @+Le Pivert !!!

J'ai crée un tas de codes avec ce 52, alors que cela était si simple ..

Merci encore !!!
0

Discussions similaires

Snapchat, photo qui ne s'enregistre pas
Anaisw93 -
Lolilolstar -

11 réponses
Je peux plus enregistrer mes photos dans le chat sur snap
Jediidnd -
Panth33ra -

1 réponse
"Impossible d'enregistrer certaines polices"
Hugo.dbl -
Moon -

5 réponses