Macro qui ne fonctionne pas pour word mac

Bonjour à tout le monde.

je ne comprends ce qui cloche dans ma programmation, pourriez-vous m'aider, j'ai choisi la touche cmd+L,L pour l execution. cela ne fonctionne pas. voici le détail ci-après. je veux simplement ajouter une légende sous mes photos.

Sub raccourcilegende() ' ' raccourcilegende Macro ' '     CaptionLabels.Add Name:="legende"     AutoCaptions.CancelAutoInsert     With AutoCaptions("Word.Document.12")         .AutoInsert = True         .CaptionLabel = CaptionLabels("legende")     End With     CaptionLabels("legende").Position = wdCaptionPositionAbove     With CaptionLabels("legende")         .NumberStyle = wdCaptionNumberStyleArabic         .IncludeChapterNumber = False     End With     With AutoCaptions("Word.DocumentMacroEnabled.12")         .AutoInsert = True         .CaptionLabel = CaptionLabels("Figure")     End With     CaptionLabels("Figure").Position = wdCaptionPositionBelow     With CaptionLabels("Figure")         .NumberStyle = wdCaptionNumberStyleArabic         .IncludeChapterNumber = False     End With End Sub••••ˇˇˇˇ

Macintosh / Chrome 108.0.0.0