Juergens-Workshops.de Forum
DXF Export - Druckversion

+- Juergens-Workshops.de Forum (https://forum.juergens-workshops.de)
+-- Forum: Corel Grafik Forum (https://forum.juergens-workshops.de/forumdisplay.php?fid=65)
+--- Forum: Corel Draw (https://forum.juergens-workshops.de/forumdisplay.php?fid=93)
+--- Thema: DXF Export (/showthread.php?tid=37925)



DXF Export - DJMC - 29.06.2019

Hallo an euch alle

habe wiedermal eine Frage.....
Ich habe eine Coreldatei mit 100 Seiten!
Diese muß ich als DXF Exportieren.
Corel Exportiert aber nur eine Seite.( ich muß jede Manuell Exportieren:-(  )
Wie kann ich alle Seiten auf 1x Exportieren? ( So wie beim EPS Export)

LG
Michael


RE: DXF Export - mvm - 29.06.2019

Hallo Michael,

kannst Du in Deinem Zielprogramm ausschließlich DXF öffnen, oder auch anderes wie beispielsweise PDF importieren? Autocad z.B. kann das und hier hättest Du beim Export aus Corel alle Optionen.


RE: DXF Export - norre - 29.06.2019

Hallo,

schau man bei den Macros, dort der File Converter. Damit könnte es vielleicht gehen.

Zumindest könntest du damit die ganzen Seiten aus deinem Dokument automatische als einzelne CDR-Dateien abspeichern und diese dann wieder in einzelne DXF konvertieren

Gruß
Norre


RE: DXF Export - koter - 29.06.2019

Hallo Michael,

Dies Makro exportiert alle Seiten in einzelne DXF-Dateien:

Code:
Sub ExDXF()
   Dim p As Page
   Dim Pfad As String
   Dim z As Integer
   Pfad = ActiveDocument.FilePath
   z = 0
   For Each p In ActiveDocument.Pages
       z = z + 1
       p.Activate
       ActiveDocument.Export Pfad & Left(ActiveDocument.FileName, _
       Len(ActiveDocument.FileName) - 4) _
       & "_" & z & ".dxf", cdrDXF, cdrCurrentPage
   Next
End Sub

Der Zielpfad ist der des Dokuments.

Gruß

Koter


RE: DXF Export - DJMC - 03.07.2019

Hallo Koter

Genau so brauchte ich das!!!!

Vielen Vielen Dank!!!!!



Gruß Michael