Steuerelement rechts dauerhaft positionieren

gibt es eine Möglichkeit ein Steuerelement, eine Checkbox,
so in einer Zelle zu positionieren, daß, wenn die Ceckbox am rechten Rand ist und dieser verschoben wird, die Checkbox mitwandert?

Hier mal ein Auszug aus meinem Code bisher:
...
Spaltenbreite = rngCell.Width
Blatt.OLEObjects.Add(ClassType:="Forms.CheckBox.1", Link:=True, _
DisplayAsIcon:=False, IconLabel:="", _
Left:=(rngCell.Left + (Spaltenbreite - 12)), Top:=rngCell.Top, Width:=12, Height:= _
12).Select
...

Danke für die Hilfe!

Carsten