PROBLEME DE MACRO SUR EXCELL OFFICE 365 2021 MAC

Question

Bonjour

Je reviens vers vous car la solution ne m'a pas été apportée.

En effet , j'ai fichier Excel avec des macros qui fonctionnait parfaitement avec Excel 2011. depuis que j'ai installé Office 365 et Excel sur mon nouveau Mac avec puce M1, ces fichiers ne fonctionnent plus, que des débogages. Pour info le fichier fonctionne sur PC, mais pas sur Mac .

Voici l'erreur:

Macro sur Mac MS Office 365

Cette macro fonctionne sur un Office 2019 sur PC

Ligne d’erreur en rouge ( gras)

Code erreur 438

Sub AddToCellMenu()

Dim ContextMenu1, ContextMenu2 As CommandBar

Dim MonSubMenu1, MonSubMenu2 As CommandBarControl

Dim Opt As String



'Supprimer les menus

DeleteFromCellMenu

Set ContextMenu = Application.CommandBars("Cell")

'Rajouter les menus

Set MonSubMenu1 = ContextMenu.Controls.Add(Type:=msoControlPopup, before:=1)

Set MonSubMenu2 = ContextMenu.Controls.Add(Type:=msoControlPopup, before:=1)



With MonSubMenu1

    .Caption = "Formater les Cellules"

    .Tag = "Mon_Cell_Control_Tag1"



    With .Controls.Add(Type:=msoControlButton)

        .OnAction = "'" & ActiveWorkbook.Name & "'!" & "Maj"

        .FaceId = 100

        .Caption = "Majuscule"

        Opt = "Maj"

    End With

End With

Peut on demander aux développeurs de faire le nécessaire au plus vite car cela fait plusieurs semaine que je ne peux plus travailler sur mon fichier.

Cela est assez incroyable qu'une firme comme Microsoft qui réalise des milliards de bénéfices ne puissent pas mettre tout en oeuvres pour remedier à ce dysfonctionnement.

Pour information mon fichier fonctionne parfaitement sur un pc windows avec OFFICE / excell 365

Pour ma part impossible de mettre sur mon ordi mac un bootcamp ou un windows virtuel.

Dans l'attente de votre réponse, je vous souhaite une belle journée.

Pascal S