Help to get catproduct user defined properties
Help to get catproduct user defined properties
(OP)
Hi cklong,
amazing aplication you have done!
I need to get the user defined properties as you are doing with your code. I've tried a lot of ways but non have work for me.
Could you please help me with this? which function or method are you using??
Thanks in advance!!
amazing aplication you have done!
I need to get the user defined properties as you are doing with your code. I've tried a lot of ways but non have work for me.
Could you please help me with this? which function or method are you using??
Thanks in advance!!





RE: Help to get catproduct user defined properties
RE: Help to get catproduct user defined properties
Public TEB(500) As String
Set opart = CATIA.ActiveDocument
Set PartDoc = CATIA.ActiveDocument.GetItem(opart.Name)
Set partnum = PartDoc
PNUM = partnum.PartNumber
descr = partnum.DescriptionRef
On Error Resume Next
Dim XTemp As Long
Dim TE As String
XTemp = 1
A1 = Len(partnum.Name) + 12
While parameters1.Count > (XTemp - 1)
strtemp = parameters1.Item(XTemp).Name
A2 = Len(strtemp)
Set strParam1 = parameters1.GetItem(strtemp)
strtemp = Right(strtemp, A2 - A1)
strt = strParam1.Value
TENUM = XTemp
TEA(XTemp) = strtemp
TEB(XTemp) = strt
XTemp = XTemp + 1
Wend
'this will get the properties name as TEA(1),TEA(2),...
'and the Value as TEB(1),TEB(2),...
i think this is what you need hope this helps you