Macro para guardar un archivo modificado con su nombre basado en el original.

[wtjmjhouposmeakoqn]

Buenas tardes.

Estoy elaborando la grabación de un conjunto de acciones que necesito para un trabajo repetitivo a realizar en diferentes archivos dwg.

Tras la ejecución de dichas acciones, me gustaría finalizar la macro con FILEDIA 0, GUARDARCOMO, enter (para que me guarde por defecto en mi versión de AutoCad, y, por ultimo, me da la opción de escribir el nombre del archivo a guardar... Aquí viene la duda, y es que me gustaría que fuese el mismo nombre del archivo original pero añadiendo una terminación final, por ejemplo "_mod". Este paso es el que no se como hacer.

Como ejemplo, mi objetivo es abrir un plano (llamémosle Dibujo.dwg), teclear mi macro y que automáticamente se genere un archivo modificado con todas las acciones programadas llamado Dibujo_mod.dwg, en la misma ruta de archivo donde también se mantenga el Dibujo.dwg original.

Espero haberme explicado, muchas gracias.

[juanpablo.molinaKGVXV · Accepted solution]

Hola buen dia:

intenta con esto haber si es lo que buscas.

(vla-SaveAs
   (vlax-get-property
      (vlax-get-acad-object)
      'ActiveDocument
   )
   (strcat
      (getvar "DWGPREFIX")
      (vl-filename-base (getvar "DWGNAME"))
      "_mod.dwg"
   )
   ac2018_dwg
)

donde dice ac2018_dwg puedes poner cualquier otra versión y formato según las constantes que encuentras en la ayuda del autocad en la referencia del metodo saveas
Miralo aqui:
https://help.autodesk.com/view/OARX/2024/ENU/?guid=GUID-ED0D0B02-25FC-4ED2-9DEE-2B0C9AA9416A