Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de
  AutoCAD VBA
  Ploten von Layout

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
  
NVIDIA GTC Paris und ISC High Performance-Konferenz 2025, eine Pressemitteilung
Autor Thema:  Ploten von Layout (699 mal gelesen)
Pitsch52
Mitglied
Mechaniker /Konstrukteur


Sehen Sie sich das Profil von Pitsch52 an!   Senden Sie eine Private Message an Pitsch52  Schreiben Sie einen Gästebucheintrag für Pitsch52

Beiträge: 44
Registriert: 03.01.2005

erstellt am: 14. Okt. 2006 12:33    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo Leute

Weiss jemand wie man einfach ein Layout oder den Modelbereich mit VBA auf dem Drucker ausgibt. Es gibt ja hier kein Printer-Objekt wie in VB6. Und einfach einen befehl <Layout.Plot>, der mir das aktive Layout der Zeichnung auf dem Standard-Drucker mit den Standard-Drucker-Einstellungen ausgibt finde ich niergens . Ich brauche das zum ersten Mal und stehe nun vor dem Problem, dass ich keine Ahnung habe wie das geht. Die Forums-Suche bringt zwar ein paar Beiträge, aber genau die interressanten sind leer, also keine Antworten.

Mit freundlichen Grüssen! Pitsch

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

Carsten1210
Mitglied
staatl. geprüfter Holztechniker


Sehen Sie sich das Profil von Carsten1210 an!   Senden Sie eine Private Message an Carsten1210  Schreiben Sie einen Gästebucheintrag für Carsten1210

Beiträge: 1360
Registriert: 24.07.2002

AutoCAD ACA 2024
Solidworks 2022 Sp5
Enterprise PDM 2022 Sp5
Pascam Woodworks
Visual Studio 2017 Pro
Windows 10 64Bit
Dell Precision 3660
Intel Core i9-12900K
32 GB Arbeitsspeicher
2x Dell U2415

erstellt am: 14. Okt. 2006 15:49    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Pitsch52 10 Unities + Antwort hilfreich

Hallo Pitsch,

Plotten kannst du wie folgt:
ThisDrawing.Plot.PlotToDevice "PDFCreator.pc3"
oder
ThisDrawing.Plot.PlotToDevice

Du musst allerdings vorher die Seiteneinrichtung erstellen.

Gruß, Carsten

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

Pitsch52
Mitglied
Mechaniker /Konstrukteur


Sehen Sie sich das Profil von Pitsch52 an!   Senden Sie eine Private Message an Pitsch52  Schreiben Sie einen Gästebucheintrag für Pitsch52

Beiträge: 44
Registriert: 03.01.2005

erstellt am: 14. Okt. 2006 17:58    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo Carsten1210

Danke für die Antwort funktioniert mit Layouts ganz gut!  
Wenn ich aber im Modellbereich drucke, erhalte ich einen sehr grossen weissen Bereich auf dem Papier und die gezeichnete Geometrie ist nur ganz klein zu sehen. Sehr warscheinlich müsste da noch ein Druckbereich definiert werden. Wie definiere ich nun einen solchen Druckbereich. Ein Fenster das dann gedruckt wird?

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

Carsten1210
Mitglied
staatl. geprüfter Holztechniker


Sehen Sie sich das Profil von Carsten1210 an!   Senden Sie eine Private Message an Carsten1210  Schreiben Sie einen Gästebucheintrag für Carsten1210

Beiträge: 1360
Registriert: 24.07.2002

AutoCAD ACA 2024
Solidworks 2022 Sp5
Enterprise PDM 2022 Sp5
Pascam Woodworks
Visual Studio 2017 Pro
Windows 10 64Bit
Dell Precision 3660
Intel Core i9-12900K
32 GB Arbeitsspeicher
2x Dell U2415

erstellt am: 14. Okt. 2006 18:37    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Pitsch52 10 Unities + Antwort hilfreich

Hallo Pitsch,

Hier ein paar Einstellungen:

Dim p1(0 To 1) As Double
Dim p2(0 To 1) As Double
p1(0) = 0
p1(1) = 0
p2(0) = 210
p2(1) = 297
ThisDrawing.ActiveLayout.CanonicalMediaName = "A4"
ThisDrawing.ActiveLayout.StyleSheet = "monochrome.ctb"
ThisDrawing.ActiveLayout.StandardScale = ac1_1
ThisDrawing.ActiveLayout.PlotType = acWindow
ThisDrawing.ActiveLayout.CenterPlot = True
ThisDrawing.ActiveLayout.SetWindowToPlot p1, p2
ThisDrawing.ActiveLayout.PlotRotation = 0

Gruß, Carsten

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



Anzeige:Infos zum Werbeplatz >>

ELCOVISION 10 CAD APP für GIS, Vermessung und Kartografie, Messtechnik, Tiefbau

ELCOVISION 10 berechnet aus Bildern normaler Kameras oder Drohnen vollautomatisch hochgenaue und hochdetaillierte 3D Modelle und Punktwolken in nahezu Laserscanqualität. Diese Punktwolken können dann z.B. einfach nach BricsCAD für weitere Auswertung importiert werden.

Pitsch52
Mitglied
Mechaniker /Konstrukteur


Sehen Sie sich das Profil von Pitsch52 an!   Senden Sie eine Private Message an Pitsch52  Schreiben Sie einen Gästebucheintrag für Pitsch52

Beiträge: 44
Registriert: 03.01.2005

erstellt am: 15. Okt. 2006 17:37    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo

Besten Dank für die Hilfe!  
Jetzt hab ich es begriffen. Läuft wie geschmiert.

Mit freundlichen Grüssen! Pitsch

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2025 CAD.de | Impressum | Datenschutz