Cze wszystkim
Mam w sieci makro, które pozwala z części stworzyć automatyczny rysunek ze wszystkimi wymiarami.
Wprowadziłem pewne zmiany (ścieżki szablonów, adaptację niektórych funkcji, ...), ale gdzieś mam wilka i nie mogę znaleźć tej wady.
Jeśli ktoś może mi pomóc, byłoby super :-).
PS: mamy tylko licencję Standard, więc nie mamy dostępu do niektórych narzędzi. Stąd idea makro ;-).
Z góry dziękuję, życzę miłego dnia.
Sébastien
Auto.swp rysunek (57 KB)
Kim jest wilk?
Jeśli nie więcej wyjaśnień, trudno określić, gdzie się zacina podczas uruchamiania kodu.
Czy uruchamiałeś go krok po kroku, żeby go debugować?
Do kroku w edytorze makr potem f8 dla zaawansowanych linia po linii, aż się zacina lub pojawią się błędy.
Edycja: I też oryginalny kod, żeby spróbować zrozumieć błąd dalej.
Po szybkim wypróbowaniu działa świetnie, jeśli dobrze opisujesz swoje poglądy.
Zamiast *Front, spróbuj na przykład z *Face, jeśli twój szablon ma widok o francuskich nazwach, tak jak ja,
Set swViewFront = swDrawing.CreateDrawViewFromModelView3(partPath, "*Face", 0, 0, 0)
No i to było na tyle :-).
Z drugiej strony, kontynuowałem makro i pojawił się błąd przy przesuwaniu widoków.
Idealnie byłoby wyrównać rzutowane widoki z widokiem podstawowym.
Nie miałem widoku, który byłby wyświetlany.
I tak, próbowałem z F8, żeby znaleźć mój problem.
Jeśli chcesz stworzyć wszystkie widoki w jednym miejscu, spróbuj:
Create1stAngleViews2
I przynajmniej są już zgodne.
Albo według preferencji
Create3rdAngleViews2