Macro for rounded outline

Hello everyone

Does anyone know a macro code to leave rounded contour?

Parents
No Data
Reply
  • Select  shapes and run following code

    Sub Macro1()
    Dim OrigSelection As ShapeRange
    Set OrigSelection = ActiveSelectionRange
    OrigSelection.SetOutlineProperties 0.347222222, , CreateCMYKColor(0, 100, 100, 0), LineJoin:=cdrOutlineRoundLineJoin
    End Sub

    Brg Mek

Children