---

Hallo zusammen

Ich tue mich schwer damit in VBA unter AutoCAD 2002 einen DIN-Planrahmen zu plotten. Die eigentliche Plotprozedur ist dabei nur ein SendCommand wie es unten zu sehen ist. Es plottet die Datei anhand einer vorher eingelesenen Seiteneinrichtung "Variable pagesetup".

aDoc.SendCommand "_-plot" & vbCr & "N" & vbCr & vbCr & pagesetup & vbCr & vbCr & vbCr & "J" & vbCr & "N" & vbCr

Das Drucken wird an und für sich schon ausgelöst, nur ist der Planrahmen nicht richtig positioniert. Es scheint so als würde er Zoom Grenzen und Grösse einpassen nicht richtig aus der Seiteneinrichtung übernehmen. Wenn ich manuell ins Plottenmenü gehe, dort die Seiteneinrichtung lade und drucke gehts komischerweise. Woran könnte das liegen?

Viele GRüsse
Hänk

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Hänk,

Wenn du nur die Seiteneinrichtung für deinen Planrahmen übernehmen willst kannst du das auch so lösen:

Dim PlotConfigurations As AcadPlotConfigurations
Dim NewPC1 As AcadPlotConfiguration
Set PlotConfigurations = ThisDrawing.PlotConfigurations
Set NewPC1 = PlotConfigurations.Item("Setup2")
ThisDrawing.ActiveLayout.CopyFrom NewPC1

Dann fällt auch der Kram mit dem Sendcommand weg, was man auch nur einsetzen sollte, wenn es nicht anders geht. 

Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke für den Tipp, ich habe mir das zu Herzen genommen. FUnktioniert nun einwandfrei

Vielen Dank für die Hilfe  

[Diese Nachricht wurde von Hänk am 10. Aug. 2006 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP