---

Hallo zusammen

Ich habe mir die Regel aus dem Internet geladen.
Nun wollte ich bevor etwas in Excel rausgeschrieben wird abfragen
welche Stückliste auf der Zeichnung vorhanden ist.
Wie kann ich das mit iLogic machen?

Code:

'-------------Start of ilogic ------------------------------------------------
'get the path and name of the drawing file
path_and_name = ThisDoc.PathAndFileName(False) ' without extension

'define oDoc
oDoc = ThisDoc.Document

'specify the drawing sheet
oSheet = oDoc.Sheets("Sheet:1") ' sheet by name
'oSheet = oDoc.Sheets(1) ' first sheet

' say there is a Partslist on the sheet.
oPartslist = oSheet.PartsLists(1)
     
' create a new NameValueMap object
oOptions = ThisApplication.TransientObjects.CreateNameValueMap

'specify an existing template file
'to use For formatting colors, fonts, etc
oOptions.Value("Template") = "C:\Temp\PartListExport.xls"
 
'specify the columns to export         
oOptions.Value("ExportedColumns") = "QTY;PART NUMBER;DESCRIPTION"
 
'specify the start cell
oOptions.Value("StartingCell") = "A3"
 
'specify the XLS tab name
'here the file name is used
oOptions.Value("TableName") = ThisDoc.FileName(False) 'without extension

'choose to include the parts list title row
'in this example "Ye Old List of Parts" is written to the StartingCell
oOptions.Value("IncludeTitle") = True         

'choose to autofit the column width in the xls file
oOptions.Value("AutoFitColumnWidth") = True
       
' export the Partslist to Excel with options
oPartslist.Export(path_and_name & ".xls", _
PartsListFileFormatEnum.kMicrosoftExcel, oOptions) 

'-------------End of ilogic ------------------------------------------------

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

---

Hi

Zitat:

---

welche Stückliste auf der Zeichnung vorhanden ist.

---

heißt was?  Entweder ist eine Teileliste (Stücklisten gibt's auf der Zeichnung nicht) auf dem Blatt oder nicht oder es sind mehrere. Wär schon praktisch eure Unterscheidungskriterien mitzuteilen.

------------------
MfG
Ralf

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

---

Stuckli_1.iLogicVb.txt

Hallo rKausKH

Wir haben in der IDW-Vorlage drei Teilelisten definiert:
Dies sind wie folgt bezeichnet Schweißstückliste, Mengenstückliste u.
Halbzeugliste (Halbzeugliste wird nur auf einer Bauteilzeichnung verwendet spielt somit keine Rolle für die Abfrage). Da die Schweißstückliste und die Mengenstückliste sich nur durch die Spalte AV unterscheiden kann es vorkommen dass die Schweißstückliste
auf der Zeichnung ist und nicht die Mengenstückliste.
Deshalb möchte ich abfragen nach dem Namen der Stückliste wenn der Name richtig dann ok wenn nicht Massagebox mit Info an Bediener.
hab mal den Code meiner Regel  und die idw beigefügt.

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

---

Zeichnung1.idw

Hab die Zeichnung vergessen

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

---

Hallo

Die Teilelisten sind ja über verschiedene Teilelistenstile definiert. Warum nicht deren Namen als Unterscheidung hernehmen?

Code:

---

If oPartslist.Style.Name="Schweißstückliste (LEO)" Then
MsgBox ("huhu")
End If

---

------------------
MfG
Ralf

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

---

Hallo rkausKH

hat funktioniert. Danke

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