| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Quattro Robotics nutzt ZW3D zur Schulung und zum Design von Automatisierungslösungen |
Autor
|
Thema: Automatisch beim Speichern der IDW ein PDF erstellen (23697 mal gelesen)
|
Doc Snyder Moderator Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen
Beiträge: 13310 Registriert: 02.04.2004 IV 2019 + 2020 + 2021 W7pro64 F-Secure-Safe Dell-M4600 2,13GHz 12GB Quadro2000M 15,4"1920x1080 MS-IntelliMouse-Optical SpacePilotClassic
|
erstellt am: 27. Mai. 2004 14:26 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Hallo Forum, ich bin unsicher ob diese Sache das ist, was ich suche, denn mit pdf bin ich wenig vertraut. Ich würde gerne den aktuellen Stand unserer idws in einem anderen Format speichern, um 1. der Anfälligkeit der idw gegen kleine, unerhebliche Änderungen im Modell zu entkommen bzw. die idw auf einem bestimmten Entwicklungsstand einfrieren zu können, 2. herausgebbare, schnell ladbare und allgemein lesbare Dokumente zu haben, und 3. Seriendruck mit automatischer Wahl von Drucker und Format vollziehen zu können. Geht das damit? Welche Möglichkeiten gibt es noch? Grüße Roland Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bene Ehrenmitglied ich putz' hier nur
Beiträge: 1939 Registriert: 10.04.2002
|
erstellt am: 27. Mai. 2004 14:54 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
Michael Puschner Moderator Rentner
Beiträge: 13003 Registriert: 29.08.2003 Toshiba Encore mit MS Office Ein Programm sollte nicht nur Hand und Fuß, sondern auch Herz und Hirn haben. (Michael Anton)
|
erstellt am: 27. Mai. 2004 18:58 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
muelb Mitglied Maschineningenieur
Beiträge: 85 Registriert: 21.02.2003 Inventor 2023, Vault Pro 2023, Terminalserver mit Nvidia Tesla.
|
erstellt am: 31. Okt. 2008 08:21 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Ich hab da noch so ein kleines Problem. Wenn ich bei so einem Drucker Makro einen Netzwerkdrucker angebe: oDrgPrintMgr.Printer = "NPMAR003_PCL6" erscheint immer ein Laufzeitfehler: Die Methode 'Printer' für das Objekt '_IRxDrawingPrintManager' ist fehlgeschlagen. Alle lokalen Drucker funktionieren. Dieser Drucker hängt am Netz und heisst NPMAR003_PCL6 an SRMAR001 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
daywa1k3r Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
erstellt am: 31. Okt. 2008 08:41 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
muelb Mitglied Maschineningenieur
Beiträge: 85 Registriert: 21.02.2003 Inventor 2023, Vault Pro 2023, Terminalserver mit Nvidia Tesla.
|
erstellt am: 31. Okt. 2008 09:25 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
muelb Mitglied Maschineningenieur
Beiträge: 85 Registriert: 21.02.2003 Inventor 2023, Vault Pro 2023, Terminalserver mit Nvidia Tesla.
|
erstellt am: 02. Nov. 2008 09:32 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Wow da werd ich doch jetzt ein wenig sauer auf Autodesk! Ich habe eine Support Anfrage betreffend meines Problems mit der oDrgPrintMgr.Printer Zuweisung gestellt. Als Antwort kriegte ich die Aussage, dass ich meinen Systemverwalter fragen solle oder eine Windows Support Anfrage??? Kann mir mal jemand sagen was dies mit Windoof Support zu tun haben soll? Unsere Firma zahlt jedes Jahr viel Geld für diese Subskription und wenn man dann mal eine Frage hat, weil man sich das Leben mit der bockigen DIVA erleichtern will, Funktionen einbauen, die jedes vernünftige Programm von Haus aus haben sollte, wird man so abgewiesen. Ich hoffe nun auf Support durch das Forum, da ich unmöglich dem Autodesk Ceveloper Network (auch ein Vorschlag vom Support) beitreten kann (bin kein Software-Entwickler). Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
PaulSchuepbach Mitglied Programmierer
Beiträge: 1005 Registriert: 01.10.2003
|
erstellt am: 02. Nov. 2008 13:50 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
muelb Mitglied Maschineningenieur
Beiträge: 85 Registriert: 21.02.2003 Inventor 2023, Vault Pro 2023, Terminalserver mit Nvidia Tesla.
|
erstellt am: 03. Nov. 2008 07:23 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Danke! Es läuft jetzt wunderbar: oDrgPrintMgr.Printer = "\\SRMAR001\NPMAR003_PCL6" war die Lösung. Wegen dem Support: Ich finde man muss es immer ein wenig im Verhältnis sehen. Der Developer Support kostet noch einmal 1300¤ und dies für eine solche Frage? Zum Glück gibt es dieses Forum! Nochmals recht herzlichen Dank. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
daywa1k3r Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
erstellt am: 03. Nov. 2008 08:04 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
muelb Mitglied Maschineningenieur
Beiträge: 85 Registriert: 21.02.2003 Inventor 2023, Vault Pro 2023, Terminalserver mit Nvidia Tesla.
|
erstellt am: 03. Nov. 2008 10:44 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
daywa1k3r Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
erstellt am: 03. Nov. 2008 10:53 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
Ex-Mitglied | |
daywa1k3r Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
erstellt am: 03. Nov. 2008 11:10 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
Ex-Mitglied | |
Schattenbacke Mitglied Dipl.-Ing (FH)
Beiträge: 114 Registriert: 28.01.2009 Dell Precision T3500 Productstream Professional Easy 2011 Autodesk Inventor Pro 2016
|
erstellt am: 28. Jan. 2009 08:56 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Hallo, habe nun folgendes Makro vom Threadbeginner modifiziert:
Code: Sub AutoSave() PlotAllSheetsInDrawing End SubPublic Sub PlotAllSheetsInDrawing() 'Print all sheets in drawing document 'Get the active document and check whether it's drawing document If ThisApplication.ActiveDocument.DocumentType = kDrawingDocumentObject Then Dim oDrgDoc As DrawingDocument Set oDrgDoc = ThisApplication.ActiveDocument ' Set reference to drawing print manager ' DrawingPrintManager has more options than PrintManager ' as it's specific to drawing document Dim oDrgPrintMgr As DrawingPrintManager Set oDrgPrintMgr = oDrgDoc.PrintManager ' Set the printer name ' comment this line to use default printer or assign another one oDrgPrintMgr.Printer = "FreePDF XP" oDrgPrintMgr.PrintRange = kPrintAllSheets 'Set the paper size and scale On Error Resume Next Select Case oDrgDoc.ActiveSheet.Size Case kA4DrawingSheetSize oDrgPrintMgr.PaperSize = kPaperSizeA4 oDrgPrintMgr.ScaleMode = kPrintCustomScale oDrgPrintMgr.[Scale] = 1 Case kA3DrawingSheetSize oDrgPrintMgr.PaperSize = kPaperSizeA3 oDrgPrintMgr.ScaleMode = kPrintCustomScale oDrgPrintMgr.[Scale] = 1 Case kA2DrawingSheetSize oDrgPrintMgr.PaperSize = kPaperSizeA2 oDrgPrintMgr.ScaleMode = kPrintCustomScale oDrgPrintMgr.[Scale] = 1 Case kA1DrawingSheetSize oDrgPrintMgr.PaperSize = kPaperSizeA2 oDrgPrintMgr.ScaleMode = kPrintBestFitScale Case kA0DrawingSheetSize oDrgPrintMgr.PaperSize = kPaperSizeA2 oDrgPrintMgr.ScaleMode = kPrintBestFitScale Case Else ' Andere Werte. Debug.Print "ungültiges Papierformat" End Select 'Set the paper orientation On Error Resume Next Select Case oDrgDoc.ActiveSheet.Orientation Case kLandscapePageOrientation oDrgPrintMgr.Orientation = kLandscapeOrientation Case kPortraitPageOrientation oDrgPrintMgr.Orientation = kPortraitOrientation Case Else ' Andere Werte. Debug.Print "ungültige Orientierung" End Select oDrgPrintMgr.SubmitPrint End If End Sub
Vielen Dank schon einmal an alle für diesen Thread. Leider klappt es beim Acrobat 8.0 und beim PDFCreator nicht mit der richtigen Seitengröße und Drehung, sondern nur beim FreePDF. Ich kann also einen Knopf drücken und es erscheint das Free-PDF Fenster wo man auf "auf Desktop" "in Ordner" etc. drucken kann. Kann ich nun irgendwo einstellen, dass er sie automatisch dort speichert wo auch die IDW vorhanden ist? Achja und noch ein Problem habe ich, wo ich wohl nicht die richtigen Begriffe für die Suche verwende. Er druckt Linien etc. sehr dick, so dass kleinere Schrauben nur noch schwarze Flecken sind. Gibt es hierfür auch eine Lösung? Gibt es das IV_NATIV nun in einer neueren Version als 1.4, was auf dieser Bibliotheksseite angeboten wird? Hier im Forum vielleicht? Die Suche sucht leider immer nur mit ODER, darum finde ich nichts zu "Inventor Nativ" [Diese Nachricht wurde von Schattenbacke am 28. Jan. 2009 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
invhp Ehrenmitglied V.I.P. h.c. MB Techniker, AE, WKZmacher
Beiträge: 5552 Registriert: 16.05.2002 (fast) alles, was Autodesk im Mechanikbereich anbietet ;)
|
erstellt am: 28. Jan. 2009 12:11 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
Schattenbacke Mitglied Dipl.-Ing (FH)
Beiträge: 114 Registriert: 28.01.2009 Dell Precision T3500 Productstream Professional Easy 2011 Autodesk Inventor Pro 2016
|
erstellt am: 28. Jan. 2009 14:48 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Ja klar, wenn man denn 2009 hätte So, jetzt bin ich soweit und habe einen zusätzlichen PFreePDF-Drucker erstellt, wo ich z.b. einstellen kann dass er automatisiert den Knopf "auf Desktop" drückt. Nur dummerweise benötige ich die Funktion, dass er es dorthin "druckt", wo die Quelldatei vorhanden ist. Ist das überhaupt möglich? Inventor muss ja dem PDF-Programm irgendwie mitteilen wo die Quelldatei herstammt. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Harry G. Ehrenmitglied V.I.P. h.c. one-man-show
Beiträge: 4585 Registriert: 24.01.2003 PDSP2014.1.3; W7.1-64 E3-1240, 16 GB Quadro K2000
|
erstellt am: 28. Jan. 2009 15:21 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Zitat: Original erstellt von invhp: Ihr druckt, wenn ich das richtig sehe, um das PDF zu erstellen. Wäre es nicht einfacher das PDF über die neue Exportmöglichkeit in Inventor 2009 zu erstellen...
Dabei wird, zumindest auf meinem Rechner, leider ein mehr als unvollständiges PDF erzeugt, das nur Geometrie enthält und das auch nicht vollständig. ------------------ Grüße von Harry Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
SEHER Mitglied Systemanalytiker
Beiträge: 1203 Registriert: 13.03.2001 Inventor 2 bis 2022 häufig wechselnder Rechnerverkehr
|
erstellt am: 28. Jan. 2009 19:06 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
Schattenbacke Mitglied Dipl.-Ing (FH)
Beiträge: 114 Registriert: 28.01.2009 Dell Precision T3500 Productstream Professional Easy 2011 Autodesk Inventor Pro 2016
|
erstellt am: 29. Jan. 2009 07:24 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Ich habe bisher noch nie was gemacht mit VBA ^^, könntest du mir kurz sagen wie der Befehl heißt das Quellverzeichnis der Datei auszulesen. Das wär nett Wobei der PDF-Creator ja beim Aufruf dann diese Variable irgendwie untergeschoben bekommen muss. [Diese Nachricht wurde von Schattenbacke am 29. Jan. 2009 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Schattenbacke Mitglied Dipl.-Ing (FH)
Beiträge: 114 Registriert: 28.01.2009 Dell Precision T3500 Productstream Professional Easy 2011 Autodesk Inventor Pro 2016
|
erstellt am: 29. Jan. 2009 08:32 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
SEHER Mitglied Systemanalytiker
Beiträge: 1203 Registriert: 13.03.2001 Inventor 2 bis 2022 häufig wechselnder Rechnerverkehr
|
erstellt am: 29. Jan. 2009 09:34 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Zitat: wie der Befehl heißt das Quellverzeichnis der Datei auszulesen.
Ich würde es über den fullfilename rauslesen. Schau doch mal ins SDK Verzeichnis vom Inventor, da sind eine ganze Menge vba Beispiele. Für den PDFCreator oder freepdf mußt Du mal die Registry durchforsten ob da der pdf Pfad angezeigt wird. Dann mittels vba den Registrypfad einfach mit dem Erzeugerpfad überbügeln. Am besten auch wieder zurückstellen, sonst werden die nächsten pdfs z.B. aus word auch dort erstellt. ------------------ Gruß SEHER www.inventor-tools.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Fyodor Ehrenmitglied V.I.P. h.c. Dipl.-Ing.(FH) Maschinenbau
Beiträge: 2667 Registriert: 15.03.2005 DELL Precision 7740 Intel Core i9-9980HK 32 GB RAM NVISIA Quadro RTX4000 Windows 10 Enterprise<P>SolidWorks 2019 SP3.0
|
erstellt am: 29. Jan. 2009 10:01 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Hallo! Wie ich sehe gibt es immer noch diverse Makros, mit denen man PDFs erstellen kann... ich habe selbst ein hier aus dem Forum zusammengestückeltes Makro in Betrieb. Mein Problem ist, daß der Druckertreiber "Adobe PDF" nicht mit großen Seiten umgehen kann. Bis DIN A2 funktioniert es über Angabe des Papierformats, darüber nicht. Im Format A1 klappt es manchmal, aber das Format A0 wird grundsätzlich im Maßstab 1:1 auf A4 quer gedruckt. Es ist dann natürlich nur ein kleiner Ausschnitt sichtbar. In dem hier geposteten Makro werden die größeren Formate auf A2 geplottet. Habt Ihr das also auch noch nicht in den Griff bekommen? Code: Select Case PapierFormat Case 9993 'A0 oPrintMgr.PaperSize = kPaperSizeCustom oPrintMgr.PaperHeight = 841 oPrintMgr.PaperWidth = 1189 Case 9994 'A1 oPrintMgr.PaperSize = kPaperSizeCustom oPrintMgr.PaperHeight = 594 oPrintMgr.PaperWidth = 841 Case 9995 'A2 oPrintMgr.PaperSize = kPaperSizeA2 Case 9996 'A3 oPrintMgr.PaperSize = kPaperSizeA3 Case 9997 'A4 oPrintMgr.PaperSize = kPaperSizeA4 Case Else MsgBox "Das Papierformat ist ungültig!", 0, "Fehler" Exit Sub End Select
------------------ Cheers, Jochen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Schattenbacke Mitglied Dipl.-Ing (FH)
Beiträge: 114 Registriert: 28.01.2009 Dell Precision T3500 Productstream Professional Easy 2011 Autodesk Inventor Pro 2016
|
erstellt am: 30. Jan. 2009 15:05 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
daywa1k3r Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
erstellt am: 30. Jan. 2009 16:17 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
Hallo Leute, nur mal ein Hinweis an Alle, die: 1. Diese Funktionalität KOSTENLOS nutzen möchten 2. Keine Freeware / "sonstige Software" installieren möchten 3. Eine Software wollen die 100% konfigurierbar ist und alle Einstellungen automatisch vornimmt 4. Beim Speichern oder manuell Neutralformate erstellt 5. ... Seit der Version 6.0 von FX64 Plot sind alle diese Sachen bereits in der Demo Version implementiert und können unbegrenzt benutzt werden. Eine Software, mit integrierten (und lizenzierten!) PDF Treibern, die von Autodesk zertifiziert ist und sowohl mit 32 als auch mit 64 Bit funktioniert. So, schönes Wochenende! ------------------ Grüße Igor FX64 Software Solutions - Inventor Tools
[Diese Nachricht wurde von daywa1k3r am 30. Jan. 2009 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Schattenbacke Mitglied Dipl.-Ing (FH)
Beiträge: 114 Registriert: 28.01.2009 Dell Precision T3500 Productstream Professional Easy 2011 Autodesk Inventor Pro 2016
|
erstellt am: 10. Feb. 2009 07:57 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
daywa1k3r Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
erstellt am: 10. Feb. 2009 08:27 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|
Schattenbacke Mitglied Dipl.-Ing (FH)
Beiträge: 114 Registriert: 28.01.2009 Dell Precision T3500 Productstream Professional Easy 2011 Autodesk Inventor Pro 2016
|
erstellt am: 27. Feb. 2009 16:07 <-- editieren / zitieren --> Unities abgeben: Nur für MenziMuck
|