---

stuekl.JPG

Hallo
Kann man das Standardformat der Stückliste so ändern das es immer so (siehe Bild) aussieht?
Guss Michel

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

---

Hallo,
also ich würde die Lösung in einem Makro suchen. Soweit mir bekannt ist kann man keine Stücklistenformate abspeichern.

MfG
Randle

------------------
! It's not a bug, it's a feature !

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

---

Du kannst ein eigenes Format abspeichern (da wo AP203 steht, einfach ein Hinzufuegen angeben). Dann die Einstellungen entsprechend aendern.

Das Format kann jederzeit wieder aufgreufen werden.

Gruss
Catrin

------------------
CATIS GmbH                  38444 Wolfsburg
catrin.eger@catis.de        www.catis.de

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

---

@ Catrin,

ja, aber nur in der laufenden CATIA-Sitzung. Einmal Neustart und es gibt wieder nur AP203.

Oder gibt es mal wieder versteckte Einstellungen?

Gruß
Paul

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

---

Hallo Michel,

es get auch viel einfacher, hier das Makro.

#######################################################
Language="VBSCRIPT"

Sub CATMain()

Dim productDocument1 As Document
Set productDocument1 = CATIA.ActiveDocument

Dim product1 As Product
Set product1 = productDocument1.Product

Dim assemblyConvertor1 As CATBaseDispatch
Set assemblyConvertor1 = product1.GetItem("BillOfMaterial")

'Der inhalt der unteren Variablen kann untereinander auch ausgetauscht werden
Dim arrayOfVariantOfBSTR1(4)
arrayOfVariantOfBSTR1(0) = "Überarbeitung "
arrayOfVariantOfBSTR1(1) = "Teilenummer"
arrayOfVariantOfBSTR1(2) = "Typ"
arrayOfVariantOfBSTR1(3) = "Nomenklatur "
arrayOfVariantOfBSTR1(4) = "Menge"
assemblyConvertor1.SetCurrentFormat arrayOfVariantOfBSTR1

' Wenn man will kann man  die untere Variable auch auskomentieren
Dim arrayOfVariantOfBSTR2(1)
arrayOfVariantOfBSTR2(0) = "Menge"
arrayOfVariantOfBSTR2(1) = "Teilenummer"
assemblyConvertor1.SetSecondaryFormat arrayOfVariantOfBSTR2

' Damit kann man die Stückliste als Excel-Format abspeichen
'assemblyConvertor1.Print "XLS", "C:\temp\stückliste.xls", product1

End Sub

########################################

Ciao
Filippo

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

---

Hallo Filippo
läuft dein Stücklisten Makro auch unter V5.12 Sp3

gruss Ralf

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

---

Hallo Ralf,

ich habe es mit V5.12 Sp5 erstellt, aber es lauft mit sichereit auch unter andere SP`s

Ciao
Filippo

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

---

Hallo Filippo
bei mir läuft das Makro nicht ich bekomme immer die gleiche Fehlermeldung.

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

---

@RDeppe
was fuer eine Fehlermeldung und mit welcher CATIA-Release?

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

---

Hallo,

dieses Makro-Text lauft nur wenn man es als *.CATScript abspeichert.

ciao
Filippo

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

---

Hallo Filippo,

ich habe Dein Script etwas erweitern wollen bekomme
aber immer eine Fehlermeldung? Keine Ahnung warum.
Vieleicht kannst Du mir dabei helfen.

' Damit kann man die Stückliste als Excel-Format abspeichen
Dim Datei as CATBSTR
Datei = CATIA.FileSelectionBox ("Datei auswählen", "*.xls", CATFileSelectionModeSave)

assemblyConvertor1.Print "XLS", Datei, product1

Danke

Gruß Uwe

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

---

Funktioniert's inzwischen?

[Diese Nachricht wurde von amigician am 01. Jul. 2005 editiert.]

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