hoe een Block of Wblock invoegen vanuit VBA?

Status
Niet open voor verdere reacties.
S

Stijn123

Nieuwe gebruiker
Lid geworden
31 mrt 2009
Berichten
2
Hallo iedereen,
Zou er mij iemand kunnen uitleggen of de code geven hoe ik een block of wblock kan invoegen in mijn modelspace vanuit het programmeren in VBA.

Ik werk met een userform die een paar berekeningen maakt (dit werkt al) ik moet een message box krijgen met de uitkomsten (doet ie ook al) en nu moet ik (als je op de "OK" knop klikt) een block of wblock automatich kunnen laten invoegen...

Help mij aub!

Mvg, Stijn
 
Hieronder de code om een block te plaatsen. De onderstaande code laat de gebruiker een punt kiezen en insert daar een block.

Code: 
Dim P1 As Variant    
    P1 = ThisDrawing.Utility.GetPoint()
    Call ThisDrawing.ModelSpace.InsertBlock(P1, "padverwijzing\Block.dwg", 1, 1, 1, 0)

Gr.
René
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan