---

Hallo,
Ich möchte über script folgendes machen:
New part anlegen ( das ist kein Thema )
Ein PartName wird automatisch erzeugt z.B. Part1.Catpart.( auch OK )
Über ein InputBox soll der Anwender ein Nummer geben; es wird als Variable gespeichert.( auch kein Thema )
Jetzt wird es ernst.
Diese Variable möchte ich weiterleiten zum PartName und das geht bei mir nicht
Wer kann mich helfen ???
mfg sebuse

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

---

Hi sebuse,

vielleicht hilft das hier:
'_____________________________________________________________
'_____________________________________________________________

Sub CATMain()

Dim documents1 As Documents
Set documents1 = CATIA.Documents

Dim partDocument1 As PartDocument
Set partDocument1 = documents1.Add("Part")

Dim product1 As Product
Set product1 = partDocument1.GetItem("PART1")

Dim Nummer As String
Nummer = InputBox("Eingabe", "Nummer", Nummer)
product1.PartNumber = Nummer

End Sub
'______________________________________________________________
'______________________________________________________________

------------------
Gruss BADU

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