Bilder im markierten Bereich via Taste löschen

[rainer0111]

Hallo,
ich habe mir ein kleines MAKRO erstellt um einen mit Bildern markierten Bereich zu löschen. Beim Direktaufruf des MAKROs funktioniert es. 
Jetzt möchte ich das MAKRO einer Tastenkombination zuweisen. Das habe ich per Extras - Makros-Optionen gemacht.  Leider tut sich überhaupt nichts, wenn ich die entsprechende Tastenkombination drücke   ( Wahltaste + Befehlstaste + ü ). Hat jemand eine Idee, was ich da falsch mache...



   
   



MAC und Excel 2019

Grüße Rainer

[rainer0111]

Hier noch das Makro -- das funktioniert wenn ich es direkt aufrufe



Sub BereichBilderLoeschen()
Dim shp As Shape
MsgBox "xx"
For Each shp In Worksheets("Fototafel_erstellen_POS_EINGABE").Shapes
  If Not Application.Intersect(Selection, shp.TopLeftCell) Is Nothing Then
      shp.Delete
  End If
Next

End Sub



Gruss Rainer