---

wunsch.dwg.txt

Hallo mal wieder an alle.

Gibt es eigentlich die Möglichkeit beim plotten unter VBA zu sagen, daß nur ein gewisser Bereich z.B. in Form eines Polygons siehe Anhang nur geplottet wird und das an einer anderen Stelle ein Text der aus VBA heraus erzeugt wird geplottet wird?
Wenn ja, kann mir jemand einen Ansatz dazu geben, wie ich das mit dem plotten des Bereichs hinbekomme.
Oder gibt es vielleicht zumindest die Möglichkeit den Plotbereich rechteckig und nicht das ganze Blatt umfassend zu gestalten?

Gruß Dressler

[Diese Nachricht wurde von Dressler am 12. Feb. 2004 editiert.]

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

---

klar geht das, ungefähr so:

...
dim Layout As AcadLayout
Layout.CanonicalMediaName = "UserDefinedMetric (610.00 x 850.00MM)"
Layout.PaperUnits = acMillimeters
Layout.PlotRotation = ac270degrees
Layout.SetWindowToPlot PltPoint1, PltPoint2' Koordinaten
Layout.PlotType = acWindow' festlegen für Ausschnitt
Layout.PlotWithLineweights = True
Layout.PlotViewportsFirst = True
PlotOk = ThisDrawing.Plot.PlotToFile(FileName) 'in Datei plotten
If PlotOk = True Then
....

Du könntest noch einen temporären Text einfügen, Aufhängepunkt an einem der Rechteckkoordinaten, mit Offset. Oder einen vorgefertigten Attributsblock. Wenn Du, was ich vermute, nur mal schnell A4 Ausschnitte auf den Drucker schiessen möchtest, dann kannst Du noch die Skalierung verrechnen damit Dein Eintrag immer die gleiche Optik hat.

HTH,
Harry

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

---

Danke Harry,

werde das mal in die Tat umsetzen und dann schön an meinem Projekt weiter basteln.

------------------
Gruß Dressler

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