Hallo Zusammen,
ich habe mir aus der API-Hilfe ein Programmbeispiel in Access 2007 kopiert. Ziel ist es die Werte Pos., Menge, Artikelnr. aus einer Baugruppenstückliste, welche sich in einer Zeichnung befindet, auszulesen und weiter zu verarbeiten.
Es soll nur die oberste Ebene ausgelesen werden, eben genau die Werte, welche in der Zeichnungsstückliste zu sehen sind.
Hier der Beispielcode:
Public Function sl_read()
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swSelMgr As SldWorks.SelectionMgr
Dim swTable As SldWorks.TableAnnotation
Dim swBomTable As SldWorks.BomTableAnnotation
Dim i As Long
Set swApp = CreateObject("SldWorks.Application")
Set swModel = swApp.ActiveDoc
Set swSelMgr = swModel.SelectionManager
Set swTable = swSelMgr.GetSelectedObject5(1)
Set swBomTable = swTable
Debug.Print "File = " & swModel.GetPathName
For i = 0 To swTable.ColumnCount
Debug.Print " Column(" & i & ") = " & swBomTable.GetColumnCustomProperty(i)
Next i
End Function
Hier das Debug.Print - Ergebnis:
Column(0) =
Column(1) = PartNo
Column(2) =
Column(3) = Description
Column(4) =
Column(5) =
Es wird also schon mal erkannt, dass die SL 5 Spalten hat. Seltsamerweise bringt der Programmcode "nur" 2 Spaltenüberschriften.
Zur Abarbeitung bräuchte ich noch die Spaltenbezeichner für die Pos. und die Menge.
Unterschiedliche Konfigurationen sollen nicht berücksichtigt werden, es wird die "Standard-Konfiguration" sein.
Hat mir jemand einen Tipp, wie ich ermitteln kann, welche Spalten auszulesen sind, so dass die Pos. und Artikelnr. bekomme?
Vielen Dank schon mal im Voraus.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP