Een entiteit laten selecteren door een macro

Hallo

In een tekening wil ik een macro maken die me een notitie vult met de aangepaste parameter genaamd 'Productcode' van het geselecteerde onderdeel.

Ik weet hoe ik de macro moet maken voor het maken en vullen van de notitie, maar ik weet niet hoe ik de macro moet onderbreken om de gebruiker te vragen een rand of oppervlak te selecteren om de notitie aan te bevestigen.

Heeft iemand informatie of een link die nuttig voor mij kan zijn?

Bij voorbaat dank

Jey

Hallo

U kunt een eenvoudige msgBox plaatsen met een bericht als "Selecteer de entiteit .... voordat u dit bericht valideert." en haal vervolgens de entiteit op die in uw macro is geselecteerd met de functie GetSelectedObject6.

Vriendelijke groeten

Hallo

Sorry voor de vorige post, het werkt niet. Aan de andere kant kunt u het volgende doen:

Dim SelMgr As SelectionMgr
Set SelMgr = Part.SelectionManager
Set Feature = SelMgr.GetSelectedObject6(1, 0)
Do While Feature Is Nothing
    DoEvents
    Set Feature = SelMgr.GetSelectedObject6(1, 0)
Loop

 

Hierdoor kan de macro in de wacht worden gezet totdat een item is geselecteerd.

Vriendelijke groeten

4 likes

Hallo

Een domme vraag, maar waarom zou u niet uw notitie maken die verwijst naar de eigenschap  "productcode" en deze handmatig plaatsen?

Je moet een rand of gezicht selecteren om het toch te plaatsen, een neergelaten sleep zou net zo snel zijn.

2 likes

Dank je wel d.roger

Alles werkt goed.

Hartelijk dank.

accobre 427: gewoon om sneller te gaan en vooral om de herhaling van bepaalde taken te vermijden.