Vorm, kleur (kader en binnenin), dikte kader

[xenium]

Hey,

Ik vraag me af of het mogelijk is om een stukje VBA code te schrijven dat een vorm selecteert met de juiste kleuren (binnenin en kader) en de dikte van de kader.

Ik zou graag de afgeronde rechthoek willen gebruiken.

Er mag liefst nog geen vorm getekend zijn, omdat het soms een kleine vorm moet zijn, soms een grote, soms een langwerpig en ga zo maar door...

Alvast bedankt.

Groetjes,

xenium

 

[E v R]

Neem eens een macro op wanneer je zo'n vorm aanmaakt

 

[xenium]

Beste,

Dit had ik al eens geprobeerd en toen gaf hij geen code. Nu nogmaals geprobeerd en krijg ik volgende code:

ActiveDocument.Shapes.AddShape(msoShapeRoundedRectangle, 86.25, 81#, _
        237#, 51.75).Select
    Selection.ShapeRange.Fill.Visible = msoFalse
    Selection.ShapeRange.Line.ForeColor.RGB = RGB(192, 0, 0)
    Selection.ShapeRange.Line.Visible = msoTrue
    Selection.ShapeRange.Line.Weight = 1.5
    Selection.ShapeRange.Line.Visible = msoTrue
    Selection.ShapeRange.Line.Style = msoLineSingle

Nu zou ik echter willen dat er nog geen kader getrokken wordt, maar wel dat mijn instellingen juist zijn, zou dit ook mogelij zijn?

Alvast bedankt.

 

[E v R]

Word is niet mijn ding.....

Macro opnemen waarbij er geen kader is?
Die " Selection.ShapeRange.Line.Style = msoLineSingle"??