enregistré une feuille excell via macro

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 !

saverloo

XLDnaute Occasionnel
bonjour,

voici j'ai une feuille excell et sur une autre page un bouton macro

je voudrais betement que lorsque je clique sur le bouton qu'il ouvre la fonciton enregistré sous afin que la je puisse noter le nom du fichier et qu'il enregistre celui ci en format donnée xml.

en manuel forcement cela fonctionne par contre en macro je n'arrive pas a ce qu'il me demande le nom du fichier que je veux lui donner
 
Re : enregistré une feuille excell via macro

oui sorry non je n'utilise pas cette fonction en faite

voici ma macro :

Sub sauvegardefichierxml()
'
' sauvegardefichierxml Macro
' pour sauvegarder viale bouton disque le fichier totalexport en format xml afin de realiser l'exportation par la suite sur le site hdp
'

'
Sheets("totalexport").Select
ActiveWindow.SmallScroll Down:=-18
ActiveWindow.ScrollRow = 308
ActiveWindow.ScrollRow = 303
ActiveWindow.ScrollRow = 297
ActiveWindow.ScrollRow = 268
ActiveWindow.ScrollRow = 227
ActiveWindow.ScrollRow = 198
ActiveWindow.ScrollRow = 169
ActiveWindow.ScrollRow = 146
ActiveWindow.ScrollRow = 130
ActiveWindow.ScrollRow = 92
ActiveWindow.ScrollRow = 59
ActiveWindow.ScrollRow = 52
ActiveWindow.ScrollRow = 38
ActiveWindow.ScrollRow = 30
ActiveWindow.ScrollRow = 23
ActiveWindow.ScrollRow = 19
ActiveWindow.ScrollRow = 17
ActiveWindow.ScrollRow = 16
ActiveWindow.ScrollRow = 13
ActiveWindow.ScrollRow = 11
ActiveWindow.ScrollRow = 9
ActiveWindow.ScrollRow = 6
ActiveWindow.ScrollRow = 5
ActiveWindow.ScrollRow = 3
ActiveWindow.ScrollRow = 2
ActiveWindow.ScrollRow = 1
ChDir "C:\Users\alain\Desktop\HDP EXPORT TEST"
ChDir "C:\Users\alain\Desktop"
ActiveWorkbook.SaveAsXMLData Filename:= _
"C:\Users\alain\Desktop\exporthdpxml.xml", Map:=ActiveWorkbook.XmlMaps( _
"loonverwerking_Mappage")
Sheets("donnee presta de base a export").Select
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
10
Affichages
571
Retour