Macro export DXF

AutoCAD AutoCAD support
1

Bonjour,
Je souhaiterais savoir si quelqu’un avait une macro qui enregistre un fichier au format DXF dans son dossier d’origine puis referme le fichier.

Merci d’avance

2

DXFCLOSE.lsp (1,3 Ko)

(defun c:DXFCLOSE ( / dwgPath dwgName dxfFullPath oldFiledia)
  ;; 1. Vérification que le dessin a un nom et un emplacement sur le disque
  (if (= (getvar "DWGTITLED") 0)
    (princ "\nErreur : Le fichier doit être enregistré (format DWG) au moins une fois pour définir son dossier.")
    (progn
      ;; 2. Sauvegarde du DWG en cours par sécurité avant l'export
      (command "_.QSAVE")

      ;; 3. Récupération du chemin du dossier et du nom du fichier
      (setq dwgPath (getvar "DWGPREFIX"))
      (setq dwgName (vl-filename-base (getvar "DWGNAME")))
      (setq dxfFullPath (strcat dwgPath dwgName ".dxf"))

      ;; 4. Désactivation des boîtes de dialogue pour automatiser la commande
      (setq oldFiledia (getvar "FILEDIA"))
      (setvar "FILEDIA" 0)

      ;; 5. Exportation en DXF (écrase le fichier s'il existe déjà)
      (if (findfile dxfFullPath)
        (command "_.DXFOUT" dxfFullPath "_Y" "")
        (command "_.DXFOUT" dxfFullPath "")
      )

      ;; 6. Restauration de la variable d'interface
      (setvar "FILEDIA" oldFiledia)

      ;; 7. Fermeture du fichier
      ;; La vérification DBMOD évite un blocage de l'invite de commande
      (if (> (getvar "DBMOD") 0)
        (command "_.CLOSE" "_N")
        (command "_.CLOSE")
      )
    )
  )
  (princ)
)
3

Merci,
après test de la macro, l’enregistrement se fait bien mais le fichier ne se ferme pas.

4

Ah ok, j’ai testé de mon côté sous AutoCAD 2027 et le dessin se ferme bien. Sous quelle version AutoCAD êtes-vous ?

5

Autocad 2026.
Par contre maintenant que j’ai chargé le lisp, dès que je veux faire un nouveau document la fenêtre pour choisir le gabarit ne s’affiche plus et j’ai seulement une commande qui demande de rentrer le nom du gabarit. C’est très embêtant et je n’arrive pas à décharger le lisp.
Est-ce normale?

6

Hello @jonathan

Sans AutoCAD et sans etre sur de comprendre :

SVP tu verifies : FILEDIA = 1

et tu verifies STARTMODE = 0/1
https://www.autodesk.com/fr/support/technical/article/caas/sfdcarticles/sfdcarticles/FRA/How-to-turn-off-the-Start-tab.html

Bye, Pat

7

Je n’ai pas pu tester car je viens de lancer une désinstallation/réinstallation d’autocad.

8

Hello

  1. OK … Wait and See …

  2. SVP ne pas oublier l Update 2026.1.1 (1.62 Go - 10/2025)

Bye, Pat

9

@jonathan comme le dit Patrice repasse ton FILEDIA à 1. Le LISP l’utilise et une interruption prématurée a du le laisser à zéro.