Wybieranie encji przez makro

Witam

Na rysunku chciałbym utworzyć makro, które wypełni mi notatkę parametrem niestandardowym o nazwie "Kod produktu" wybranej części.

Wiem, jak skonstruować makro do tworzenia i wypełniania notatki, ale nie wiem, jak przerwać makro, aby poprosić użytkownika o wybranie krawędzi lub powierzchni, do której ma zostać dołączona notatka.

Ktoś ma jakieś info lub link, który mógłby mi się przydać?

Z góry dziękuję

Jey Jey powiedział:

Witam

Możesz umieścić prosty msgBox z komunikatem takim jak "Proszę wybrać jednostkę .... przed sprawdzeniem poprawności tego komunikatu.", a następnie pobierz jednostkę wybraną w makrze przez funkcję GetSelectedObject6.

Pozdrowienia

Witam

Przepraszam za poprzedni post, to nie działa. Z drugiej strony możesz zrobić:

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

 

Pozwala to na wstrzymanie makra do momentu wybrania elementu.

Pozdrowienia

4 polubienia

Witam

Głupie pytanie, ale dlaczego nie stworzyć notatki, która wskazuje na właściwość  "kod produktu" i umieścić ją ręcznie?

Musisz wybrać krawędź lub ścianę, aby ją umieścić, upuszczone przeciągnięcie byłoby równie szybkie.

2 polubienia

Dziękuję d.roger

Wszystko działa dobrze.

Dziękuję bardzo.

ACCOBRE 427: Tylko po to, aby jechać szybciej, a zwłaszcza aby uniknąć powtarzania niektórych zadań.