| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| Workshop Leichtbauweise 2.0 bei HAM, eine Veranstaltung am 20.11.2024
|
Autor
|
Thema: Edrawing automatisch beim speichern erzeugen ? (4716 mal gelesen)
|
ROLF 2 Mitglied Konstrukteur Techniker Maschinenbau// Im Ruhestand
Beiträge: 908 Registriert: 07.03.2002 WINDOWS 7 SP2 3,1 MHZ Dell Precision 3800<P> INVENTOR 2017 SP1 Solidworks 2017 SP2
|
erstellt am: 11. Sep. 2011 15:46 <-- editieren / zitieren --> Unities abgeben:
|
grisu486 Mitglied Senior Technical Consultant MCAD
Beiträge: 575 Registriert: 14.11.2005
|
erstellt am: 11. Sep. 2011 20:57 <-- editieren / zitieren --> Unities abgeben: Nur für ROLF 2
|
ROLF 2 Mitglied Konstrukteur Techniker Maschinenbau// Im Ruhestand
Beiträge: 908 Registriert: 07.03.2002 WINDOWS 7 SP2 3,1 MHZ Dell Precision 3800<P> INVENTOR 2017 SP1 Solidworks 2017 SP2
|
erstellt am: 12. Sep. 2011 05:34 <-- editieren / zitieren --> Unities abgeben:
|
ROLF 2 Mitglied Konstrukteur Techniker Maschinenbau// Im Ruhestand
Beiträge: 908 Registriert: 07.03.2002 WINDOWS 7 SP2 3,1 MHZ Dell Precision 3800<P> INVENTOR 2017 SP1 Solidworks 2017 SP2
|
erstellt am: 13. Sep. 2011 15:54 <-- editieren / zitieren --> Unities abgeben:
|
Broedlahans Mitglied Konstrukteur
Beiträge: 184 Registriert: 09.06.2010 SWX2013 und 2014
|
erstellt am: 13. Sep. 2011 16:34 <-- editieren / zitieren --> Unities abgeben: Nur für ROLF 2
Hi, würd ich quick&dirty über den Taskplaner abfackeln. Langt das schon für dich oder muss das wirklich automatisiert gehen? Mfg Brödlahans ------------------ EHEC- die mit dem roten Stuhl - frei nach ibash Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
MWN Mitglied Dipl.-Ing.
Beiträge: 492 Registriert: 14.02.2007
|
erstellt am: 13. Sep. 2011 18:18 <-- editieren / zitieren --> Unities abgeben: Nur für ROLF 2
Hi, und ich als Zusatzanwendung per vb.net, denn dann funzt es wirklich automatisch. Einfach das Template für vb.net laden, eine neue Zusatzanwendung erzeugen und den Code in der EventHandling - Klasse im iDrawing_FileSavePostNotify - Event anlegen. Als VBA - Macro sieht das Ganze dann so aus (vb.net -> ähnlich):
Code: Dim swApp As ObjectDim Part As Object Dim boolstatus As Boolean Dim longstatus As Long, longwarnings As Long Sub main() Set swApp = _ Application.SldWorks Set Part = swApp.ActiveDoc If Part Is Nothing Then Exit Sub End If If Part.GetType = swDocDRAWING Then Dim pfad As String pfad = Part.GetPathName If pfad = "" Then Part.Save pfad = Part.GetPathName End If pfad = Strings.Left(pfad, Strings.Len(pfad) - 7) 'Debug.Print pfad longstatus = Part.SaveAs3(pfad & ".PDF", 0, 0) Else MsgBox "Keine Zeichnung geöffnet." & vbNewLine & "Aktion wird abgebrochen." End If End Sub
Grüße und HTHTobias ------------------ Besucht mich doch mal in meiner Tischlerei "...Kommunikation ist nur so gut wie ihr Ergebnis..." - frei nach Richard Bandler / John Grinder "...Wenn du das tust, was du schon immer tust, wirst du auch nur das erhalten, was du schon immer erhalten hast..." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Andi Beck Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 2580 Registriert: 02.10.2006 Firma: SW 2024-3.1 + PDM Prof. Windows 10 Pro 64bit, i9-11900 32 GbRAM, Quadro P2200 Home: SW 2023-5.0 Passungstabelle von Heinz Windows 11 Pro 64bit, i7-12700K, 32 GbRAM, GeForce GTX 1050Ti Samsung C34H892, 3440x1440 Pixel
|
erstellt am: 13. Sep. 2011 18:56 <-- editieren / zitieren --> Unities abgeben: Nur für ROLF 2
Hallo, ich habe die Erzeugung von PDF, 3D-PDF, DXF, DWG, IGES, und STEP in unser Schriftfeldmakro integriert. Es wird zwischen Zeichnungen und Parts bzw. Baugruppen unterschieden. Der Speicherort kann vorgewählt werden und es wird dem Dateinamen noch der Konfigurationsname und die Revision mit angehängt. Wer möchte kann das auf eDrawings erweitern und seinen persönlichen Bedürfnissen anpassen. Bei Bedarf bitte melden, ich hänge es dann hier rein. Grüße, Andi ------------------ Hast du kein Problem? Such dir eins. ( Und löse es ) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ROLF 2 Mitglied Konstrukteur Techniker Maschinenbau// Im Ruhestand
Beiträge: 908 Registriert: 07.03.2002 WINDOWS 7 SP2 3,1 MHZ Dell Precision 3800<P> INVENTOR 2017 SP1 Solidworks 2017 SP2
|
erstellt am: 14. Sep. 2011 21:24 <-- editieren / zitieren --> Unities abgeben:
Hallo SWX -Freunde, Danke für eure hervorragende Hilfe. Aber bei mir heißt das Zauberwort Powersave von Solidline, welches kostenfrei dabei war. Ich hab`s nur leider net gewust. Manchmal hat man Tomaten auf den Augen. Gruß
Rolf
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
amo300 Mitglied
Beiträge: 1 Registriert: 22.09.2011
|
erstellt am: 22. Sep. 2011 21:26 <-- editieren / zitieren --> Unities abgeben: Nur für ROLF 2
|
Andi Beck Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 2580 Registriert: 02.10.2006 Firma: SW 2024-3.1 + PDM Prof. Windows 10 Pro 64bit, i9-11900 32 GbRAM, Quadro P2200 Home: SW 2023-5.0 Passungstabelle von Heinz Windows 11 Pro 64bit, i7-12700K, 32 GbRAM, GeForce GTX 1050Ti Samsung C34H892, 3440x1440 Pixel
|
erstellt am: 22. Sep. 2011 21:38 <-- editieren / zitieren --> Unities abgeben: Nur für ROLF 2
Hallo Andre, und herzlich Willkommen im Forum. Das Makro habe ich angehängt. Wenn du entsprechende nützliche Erweiterungen eingebracht hast, kannst du sie ja mal bekannt geben. Evtl. haben auch noch andere Verwendung dafür. Die Ursprungsvariante ist von Stefan Berlitz und wurde von mir angepasst. Hier kursieren etliche Varianten davon. Grüße, Andi ------------------ Hast du kein Problem? Such dir eins. ( Und löse es ) Edit: Das Makro in einer überarbeiteten Version angehängt. [Diese Nachricht wurde von Andi Beck am 15. Nov. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
sonti Mitglied dipl. Masch.-Ing.
Beiträge: 1175 Registriert: 26.01.2007 Solid Works 2017 SP5 Inventor 2015 Windows 10 SWX (mein Liebling)
|
erstellt am: 23. Sep. 2011 08:58 <-- editieren / zitieren --> Unities abgeben: Nur für ROLF 2
|