| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Teileliste als csv exportieren (1417 mal gelesen)
|
CADZCHEN Mitglied Konstrukteur
Beiträge: 204 Registriert: 04.03.2005
|
erstellt am: 15. Apr. 2009 14:52 <-- editieren / zitieren --> Unities abgeben:
Hallo ! Ich bin auf der Suche nach einem Makro, welches die Teileliste von der Zeichnung in ein *. csv Format exportieren kann. Gibt es so ein Makro, oder weiss Jemand wie man es erstellen kann ?? Vielen Dank schonmal ------------------ --=== schöne Grüsse...Tobi ===-- Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik
Beiträge: 2166 Registriert: 15.11.2006 Windows 10 x64, AIP 2022
|
erstellt am: 15. Apr. 2009 15:55 <-- editieren / zitieren --> Unities abgeben: Nur für CADZCHEN
Hi Warum nicht RMT auf die Teileliste --> "Exportieren", Dateinamen tippen, Dateiformat auf CSV umstellen, unter "Optionen" evtl. noch die zu exportierenden Spalten aussuchen und "Speichern" drücken?
------------------ MfG RK Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADZCHEN Mitglied Konstrukteur
Beiträge: 204 Registriert: 04.03.2005
|
erstellt am: 15. Apr. 2009 16:23 <-- editieren / zitieren --> Unities abgeben:
|
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik
Beiträge: 2166 Registriert: 15.11.2006 Windows 10 x64, AIP 2022
|
erstellt am: 16. Apr. 2009 07:38 <-- editieren / zitieren --> Unities abgeben: Nur für CADZCHEN
Moin Also würde ein Makro reichen, das diesen Dialog mit entsprechend voreingestelltem Dateityp aufruft? Ich schau's mir mal an und melde mich wieder. ------------------ MfG RK [Diese Nachricht wurde von rkauskh am 16. Apr. 2009 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik
Beiträge: 2166 Registriert: 15.11.2006 Windows 10 x64, AIP 2022
|
erstellt am: 16. Apr. 2009 09:17 <-- editieren / zitieren --> Unities abgeben: Nur für CADZCHEN
So, da bin ich wieder. Code: Private Sub exp_PL() Dim oDrawDoc As DrawingDocument Set oDrawDoc = ThisApplication.ActiveDocument Dim oPartList As PartsList Set oPartList = oDrawDoc.ActiveSheet.PartsLists.Item(1) Dim oFileName As String oFileName = oDrawDoc.File.FullFileName Dim oFileNamePart() As String oFileNamePart() = Split(StrReverse(oFileName), "\") oFileNamePart() = Split(StrReverse(oFileNamePart(0)), ".") oFileName = "c:\temp\" & oFileNamePart(0) & ".csv" Call oPartList.Export(oFileName, kTextFileCommaDelimited) End Sub
Erstellt direkt und ohne Dialog einen csv-Export der Teileliste in C:\Temp. Den Pfad kannst du anpassen. Weggelassen habe ich sämtliche Fehlerbehandlung (IDW geöffnet? Teileliste vorhanden? usw. usw.). ------------------ MfG RK Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADZCHEN Mitglied Konstrukteur
Beiträge: 204 Registriert: 04.03.2005
|
erstellt am: 16. Apr. 2009 09:25 <-- editieren / zitieren --> Unities abgeben:
|
CADZCHEN Mitglied Konstrukteur
Beiträge: 204 Registriert: 04.03.2005 IV2010 SP3 Productstream/Vault 2010, WIN7 Inten Xeon 3,2 Ghz, 8 GB RAM, Nvidia FX 560
|
erstellt am: 16. Apr. 2009 15:53 <-- editieren / zitieren --> Unities abgeben:
|
CADZCHEN Mitglied Konstrukteur
Beiträge: 204 Registriert: 04.03.2005
|
erstellt am: 17. Apr. 2009 09:05 <-- editieren / zitieren --> Unities abgeben:
Ich hab doch noch eine Frage! Wenn ich das Makro in dem VBA-Editor starte, dann läuft alles. Wenn ich allerdings einen Button in einem Werkzeugkasten anlege, dann funktioniert es leider nicht. Das Makro wird mir auch als exp_PL angezeigt, aber in der *.idw - Umgebung läuft es nicht. Woran kann das liegen ? Danke ------------------ --=== schöne Grüsse...Tobi ===-- Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik
Beiträge: 2166 Registriert: 15.11.2006 Windows 10 x64, AIP 2022
|
erstellt am: 17. Apr. 2009 10:28 <-- editieren / zitieren --> Unities abgeben: Nur für CADZCHEN
|
CADZCHEN Mitglied Konstrukteur
Beiträge: 204 Registriert: 04.03.2005
|
erstellt am: 17. Apr. 2009 11:26 <-- editieren / zitieren --> Unities abgeben:
|