Saveas erreur 1004

Bonjour,

Je suis toute nouvelle en VBA et j'ai quelques soucis.

Je partage le fichier avec mes collègues grâce à Teams, mais le tout est en lecture seule afin que le monde ne fasse pas de bêtise et ils l'ouvrent sur l'application de bureau. Seulement, des fois ça fonctionne pour eux, mais là ça ne fonctionne plus et je n'ai aucune idée pourquoi. Chez moi, ça fonctionne.
Voici mon début code (rien d'autre avant) :

If ActiveWorkbook.Name = "Macro virements INTERAC.xlsm" Then

    Application.DisplayAlerts = False

    ActiveWorkbook.SaveAs Filename:="Macro INTERAC", accessMode:=xlShared

Lorsqu'ils cliquent sur débogage, ça leur surligne la dernière ligne.

Voici le message d'erreur :

C'est assez urgent, merci pour votre aide !

Passez une bonne journée :)

Bonjour Claire11919

Normalement, l'enregistrement du fichier ce fait avec le chemin d'accès

Ensuite, cela se fait avec l'extension du fichier ".xlsm"

@+