Espace limité par un rectangle intérieur et un rectangle extérieur

Bonjour je souhaiterai programmer sur vba "Espace limité par un rectangle intérieur et un rectangle extérieur". Aves-vous des suggestions ? Merci d'avance

Bonjour,

voici un exemple avec un shape "Plaque"

Sub test1()
'expression.AddShape(Type, Left, Top, Width, Height)
Set pl = ActiveSheet.Shapes.AddShape(msoShapeBevel, 10, 10, 100, 100)
pl.Adjustments.Item(1) = 0.2
End Sub