Hoi allemaal
Ik heb een macro op het internet gevonden waarmee je van een onderdeel de automatische tekening kunt maken met alle afmetingen.
Ik heb wat veranderingen gedaan (sjabloonpaden, aanpassing van sommige functies, ...) maar ik heb ergens een wolf en ik kan het gebrek niet vinden.
Als iemand me kan helpen, zou dat geweldig zijn :-).
PS: we hebben alleen de Standard-licentie, dus we hebben geen toegang tot sommige tools. Vandaar het idee van macro ;-).
Alvast bedankt, fijne dag verder.
Sébastien
Auto.swp Tekening (57 KB)
Wat is de wolf?
Zo niet, dan is het moeilijker om te weten waar het vastloopt als je je code uitvoert.
Heb je het stap voor stap gestart om het te debuggen?
Stap voor stap, in de macro-editor en vervolgens f8 voor geavanceerde regel voor regel totdat het vastloopt of bugs optreedt.
Bewerking: En ook originele code om de bug daarna te proberen te begrijpen.
3 likes
Na een snelle poging werkt het geweldig als je je views goed benoemt.
In plaats van *Front, probeer bijvoorbeeld met *Face, als jouw sjabloon een Frans genaamde weergave heeft, net als ik.
Set swViewFront = swDrawing.CreateDrawViewFromModelView3(partPath, "*Face", 0, 0, 0)

1 like
Nou, dat was het :-).
Aan de andere kant ben ik de macro voortgezet en er is een bug bij het herpositioneren van de weergaven.
Idealiter had je de geprojecteerde weergaven uitgelijnd met de basisweergave.

Ik had geen weergave die werd weergegeven.
En ja, ik heb geprobeerd met F8 mijn probleem te vinden.
Als je alle views in één wilt maken, ga dan:
Create1stAngleViews2
En tenminste zijn ze al op één lijn.
Of naar voorkeur
Create3rdAngleViews2
1 like