---

Stuliauslesen.JPG MakroStuliauslesen.txt

Hallo zusammen

Wir haben bei uns ein Excel Makro im Einsatz mit dessen Hilfe wir die Solidworks Stückliste einer Baugruppe in eine formatierte Excel auslesen können. Das funktioniert einwandfrei.
In der Excel Stückliste muss momentan jedoch von Hand die Zeichnungsnummer, Benennung, Version, usw. der Baugruppe eingetragen werden, das diese Angaben ja nicht in der Stückliste mit den Einzelteilen vorhanden ist.
Die Idee wäre nun dass man das Makro anpassen könnte, oder auch ein neues, um die benutzerdefinierten Eigenschaften der Baugruppe auszulesen. Vielleicht hat jemand sowas schon einmal gemacht oder könnte mir Helfen beim anpassen des Makros.

MfG
Reto

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

---

Hallo,
also, ich hab keine Erfahrung mit Excel Makros.
Aber in diesem Fall würde ich mir 2 Makros aus Stefans  MakroMania anschauen und da was zusammenbasteln.

Masse aller Baugruppenkomponenten auslesen
http://solidworks.cad.de/mm_02.htm

Schriftfeld ausfüllen
http://solidworks.cad.de/mm_09.htm

Das eine spricht SolidWorks aus Excel aus an und das andere liest Dateieigenschaften aus.

Evtl. hilft dir das weiter.
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

---

Hallo Reto,

du könntest entweder über deinen View an die Baugruppeneigenschaften kommen:

Code:

---

    Set swView = swView.GetNextView
   
    sRefModelName = swView.GetReferencedModelName
   
    Set swRefModel = swApp.OpenDoc6(sRefModelName, swDocASSEMBLY, swOpenDocOptions_Silent, "", lErrors, lWarnings)
  
    AssyVersion = swRefModel.CustomInfo2("", "Version")
    AssyZeichnungsnummer = swRefModel.CustomInfo2("", "Zeichnungsnummer")
    AssyBenennung = swRefModel.CustomInfo2("", "Benennung")

---

Oder über die Stücklistentablelle:

Code:

---

   
    Set swBomFeat = swTable.BomFeature
   
    sRefModelName = swBomFeat.GetReferencedModelName
   
    Set swRefModel = swApp.OpenDoc6(sRefModelName, swDocASSEMBLY, swOpenDocOptions_Silent, "", lErrors, lWarnings)
  
    AssyVersion = swRefModel.CustomInfo2("", "Version")
    AssyZeichnungsnummer = swRefModel.CustomInfo2("", "Zeichnungsnummer")
    AssyBenennung = swRefModel.CustomInfo2("", "Benennung")

---

Am Ende dann die Werte in die Excelzellen schreiben nicht vergessen.

Code:

---

    Cells(D, 3).Value = Zeichnungsnummer
    Cells(F, 3).Value = Benennung
    Cells(H, 3).Value = Version

---

Gruß
Bernd

------------------
--- Man muß nicht alles wissen, man muß nur wissen wo es steht ---

Staatlich anerkannte Deutschniete  

[Diese Nachricht wurde von bk.sc am 17. Jun. 2015 editiert.]

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

---

TabelleStueLiauslesen.jpg

Moin

Wir lesen unsere Baugruppen mit Makro Nr. 5 aus, und verarbeiten das ganze dann in Excel.

Sind bei euch in den Eigenschaften die Zeichnungsnummer und die Benenung getrennt? Das würde das auslesen natürlich vereinfachen.
Bei uns sind diese zusammen und müssen dann in Excel "zerlegt" werden.

------------------
MfG
L. Schröter

--------------------------------
Mobile Workstation Lenovo W520
Intel Core i7-2820QM @2,3GHz
8GB RAM
SSD Toshiba 128 GB
NVidia Quadro 2000M 2GB DDR3 (275.54)
Monitor 24" HP ZR24w
Windows 7 Prof. 64bit
---------------------------
SolidWorks 2011x64 SP4.0
SolidWorks 2012x64 SP5.0

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

---

Hallo

Vielen Dank für eure Vorschläge. Habe diese einmal angeschaut, bis jetzt jedoch ohne Erfolg, da meine VBA Kentnisse doch sehr beschränkt sind.
@ L. Schröter: Zeichnungsnummer und Benennung sind bei uns getrennt. Wie schon gesagt mit dem bestehenden Makro lesen wir einfach die Stückliste auf einer Baugruppenzeichnung aus. Ich möchte jedoch zusätzlich noch die Eigenschaften der Baugruppe selber auslesen. Makro Nr.5 habe ich vor längerer Zeit auch schon einmal angeschaut, habe es jedoch nie zum laufen gebracht 

MfG Reto

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

---

Baugruppenvisualisierung.jpg

Moin

Prinzipiell muß nicht programmieren können bei Makro Nr. 5. Man trägt einfach die Eigenschaften im Rechten Bereich ein die man braucht. Welche Eigeschaften sollen denn ausgelesen werden? Kann das ja mal schnell da eintippen und dir die Datei schicken.

Alternativ kannst du es ja mal mit der Funktion Baugruppenvisualisierung probieren. Da kann man bis zu 7 Eigenschaften anwählen und Excel exportieren lassen.

------------------
MfG
L. Schröter

--------------------------------
Mobile Workstation Lenovo W520
Intel Core i7-2820QM @2,3GHz
8GB RAM
SSD Toshiba 128 GB
NVidia Quadro 2000M 2GB DDR3 (275.54)
Monitor 24" HP ZR24w
Windows 7 Prof. 64bit
---------------------------
SolidWorks 2011x64 SP4.0
SolidWorks 2012x64 SP5.0

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