Dobrý den,

zde malý trik, jak se k tomu dostat, přestože se zpočátku zdá, že to nejde.

Sub CATMain()

   Set oS = CATIA.ActiveDocument.Selection

   oS.Search("Name='xy plane',in")

   MsgBox(oS.Item(1).LeafProduct.Name)

End Sub

Děkuji za radu.
Byl jsem rád, protože script mi chvilku fungoval, pak jsem ho nějak asi změnil a už zase nedochází k přejmenování instance name. Script je:

oSelection.Search "Name='xy plane',in" 'vyhledá rovinu xy v aktivním Partu (parametr "in")

                   [PRE] If oSelection.Count > 0 Then

                        Set oInstaceName = oSelection.Item(1).LeafProduct

                        oName = "pokus"

                        oInstaceName.Name = oName

                    End If

[/PRE]
nefunguje ani:

oSelection.Item(1).LeafProduct.Name = "pokus"

Vidíte prosím nějakou chybu? Děkuji.

Get More Details-
pest control services in vasantkunj @ http://pest-control-delhi.pestcontrolindelhi.com/pest-control-in-vasant-kunj.html
pest control services in dwarka @ http://pest-control-delhi.pestcontrolindelhi.com/pest-control-in-dwarka.html
pest control laxmi nagar @ http://pest-control-delhi.pestcontrolindelhi.com/pest-control-in-laxmi-nagar.html
pest control services in preet vihar
@ http://pest-control-delhi.pestcontrolindelhi.com/pest-control-in-preet-vihar.html
pest control vikaspuri @ http://pest-control-delhi.pestcontrolindelhi.com/pest-control-in-vikas-puri.html