Insertion de rectangle sans fond

Bonjour,
Je souhaite insérer un rectangle sans fond ("aucun remplissage").
voici mon code actuelle :

Sub Dessine_Rectangle()

Dim MyShape As Shape
    Set MyShape = ActiveSheet.Shapes.AddShape(msoShapeRoundedRectangle, 135.75, 10, 400, 50) ' creer la forme à l'endroit voulu
    With MyShape
        .Line.ForeColor.RGB = RGB(50, 255, 50) 'COULEUR BORDURE
        .????????????
    End With
End Sub

A la place des points d'interrogations je ne trouve pas quelle code écrire pour modifier mon remplissage.
Et en bonus si vous pouviez me dire aussi comment augmenter l'épaisseur de la bordure de mon rectangle.
Merci d'avance :)
EDIT : Ajout du LANGAGE dans les balises de code (la coloration syntaxique).
Explications disponibles ici :
https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code

Merci d'y penser dans tes prochains messages.