Cancel
Showing results for 
Search instead for 
Did you mean: 

Inquire Element - Measure Diameter by VBA

Valued Contributor
Valued Contributor

 

Hi, we have adaptive part with adaptive Inner diameter. Measure value for  this during placing into assembly isn't easy. We tryed made macro working this way:

1) select adaptive part by mouse

2) run macro with selected part (adaptive part in selecset)

3) Choose some cylindre in assembly by mouse click (Eg. shaft) + measure it's diameter by VBA.

How we can choose part/diameter and grab the diameter? (we need sometning like "objApp.StartCommand 25072" and grab Diameter results)

4) use measured value for update adaptive part - no problem (Call ObjAdjustablePart.SetAdjustables.....)

Do somebody have idea how we can try it? We have problem only with point 3. Thank you!

 

EDIT:

NO IDEA? We only need choose cylindre in Assembly, no whole part.

 

Posted by: Jiri Marek
Post date: 9/2/2010 1:40:56 AM

1 REPLY

RE: Inquire Element - Measure Diameter by VBA

Valued Contributor
Valued Contributor

No help, we must find it ourselve

.

.

    Set objMouse = objCommand.Mouse

    objCommand.Start

    objMouse.LocateMode = 2

    objMouse.AddToLocateFilter 32

.

.

.

  ....pGraphicDispatch.Object....

.

.

.

 

 

 

Posted by: Jiri Marek
Post date: 10/19/2010 7:29:20 PM