XL 2019 Faire activer le bouton Exporter du Développeur pour export en xml

[Fidmo]

Bonsoir à toutes & à tous.
Je suis un comptable et suis novice en excel pour activer le bouton export du Développeur de la barre des tâches pour exporter mon dossier xlsm en xml. J'ai mis mon fichier en PJ.
Un grand merci pour toute aide de nos experts et toutes bonnes âmes.
Fidmo

 

[wDog66]

Bonjour Fidmo,

Comptable Ok, mais vous devriez connaitre un minimum Excel

Menu Fichier -> Enregistrer sous

' ChatGPT
Sub EnregistrerClasseurEnXML()
    Dim chemin As String
    Dim nomFichier As String
    Dim cheminComplet As String

    ' Spécifiez le chemin où vous souhaitez enregistrer le fichier XML
    chemin = "C:\Votre\Chemin\"

    ' Spécifiez le nom du fichier sans extension
    nomFichier = "NomDuFichier"

    ' Combinez le chemin et le nom du fichier pour obtenir le chemin complet du fichier
    cheminComplet = chemin & nomFichier & ".xml"

    ' Enregistrez le classeur actif au format XML
    ActiveWorkbook.SaveAs Filename:=cheminComplet, FileFormat:=xlXMLSpreadsheet

    ' Message de confirmation
    MsgBox "Classeur enregistré en tant que XML avec succès!", vbInformation
End Sub

Bonne journée

 

[Nicolas JACQUIN]

Bonjour,

Pour exporter des données XML, faudrait-il déjà que le fichier soit un XML, sans ça le bouton Exporter restera grisé.

Bonne Journée

 

[Fidmo]

Bonjour Cher Nicolas JACQUIN,
Merci beaucoup pour votre aide et savoir. Je vais essayer de faire ce que vous m'avez dis et je reviens à vous.
Et très bonne journée également.
Fidmo

 

[Fidmo]

Bonjour Fidmo,

Comptable Ok, mais vous devriez connaitre un minimum Excel

Menu Fichier -> Enregistrer sous
Regarde la pièce jointe 1200432

' ChatGPT
Sub EnregistrerClasseurEnXML()
    Dim chemin As String
    Dim nomFichier As String
    Dim cheminComplet As String

    ' Spécifiez le chemin où vous souhaitez enregistrer le fichier XML
    chemin = "C:\Votre\Chemin\"

    ' Spécifiez le nom du fichier sans extension
    nomFichier = "NomDuFichier"

    ' Combinez le chemin et le nom du fichier pour obtenir le chemin complet du fichier
    cheminComplet = chemin & nomFichier & ".xml"

    ' Enregistrez le classeur actif au format XML
    ActiveWorkbook.SaveAs Filename:=cheminComplet, FileFormat:=xlXMLSpreadsheet

    ' Message de confirmation
    MsgBox "Classeur enregistré en tant que XML avec succès!", vbInformation
End Sub

Bonne journée

Bonjour Cher wDog66,
Merci beaucoup pour votre aide et savoir. Je vais essayer de faire ce que vous m'avez dis et je reviens à vous.
Et très bonne journée également.
Fidmo

 

[Fidmo]

Re-Bonjour Cher @wDog66,
Voilà j'ai ouvert mon fichier, suis allé à enregistrer sous, hélas ça ne me donne pas la même image que vous m'avez donnée en haut et je reste alors bloqué. D'avance merci de m'aider encore plus si je vous dérange pas trop.
Fidmo

 

[jcf6464]

Bonjour a tous et le forum,

Ces mots de passe sur le project....

Bonne continuation jcf

 

[Nicolas JACQUIN]

Bonjour jcf6464,
Même avec vba project accessible ça match pas, par-contre en descendant un peut plus il y a un 2ème choix xml qui match

Si c'est bien ça.
A plus

 

[Fidmo]

Bonsoir Mr. Job75,
Au secours Mr. Job75 ! Svp.
Fidmo

 

[wDog66]

Il devrait venir vous répondre... J'espère

 

[TooFatBoy]

Bonjour,

Je suis un comptable et suis novice en excel pour activer le bouton export du Développeur de la barre des tâches pour exporter mon dossier xlsm en xml

Quel sont le but et l'intérêt de la chose ?
Autrement dit, ça apporte quoi d'avoir un classeur enregistré en xml ?

Ceci dit, les classeurs Excel sont déjà des xml.

 

[Fidmo]

Bonsoir Mr. TooFatBoy
Le but est d'exporter des données xml à la direction des impôts, c'est le seul moyen. Et le bouton Exporter du développeur est grisé. Est-ce possible de résoudre ce problème Svp ? Je remis mon fichier en PJ.
Fidmo

 

[wDog66]

Re,

Et bien non si vous verrouillez votre VBA

Sinon, peut-être comme ceci

Sub EnregistrementXML()
  ActiveWorkbook.SaveAs Filename:="C:\Mon\Dossier\Fidmo-(2024).xml", _
        FileFormat:=xlXMLSpreadsheet, ReadOnlyRecommended:=False, CreateBackup:=False
End Sub

 

[TooFatBoy]

Le but est d'exporter des données xml à la direction des impôts, c'est le seul moyen.

J'avoue que je ne connais pas ce procédé, donc malheureusement je ne saurais t'aider.

Question peut-être stupide, mais le xlsm dézipé leur conviendrait-il ?

 

[TooFatBoy]

L'ami Nicolas JACQUIN a raison : Si tu utilises "Enregistrer sous..." et que tu prends, non pas "Données XML" mais "Feuille de calcul XML", l'export se fait et tu obtiens un fichier .XML.