Microsoft 365 Nom Macro répeter

Bonjour.
Difficile de comprendre votre problème sans voir le projet VBA de votre classeur. Auriez vous un module portant le même nom que la macro ? Quoiqu'en principe c'est interdit.

j'ai ceci :
Windows("gestion 2022.xlsm").Activate
Sheets("rach21").Visible = True
Sheets("rach21").Select
Cells.Select
ActiveSheet.Paste
Columns("B:B").Select
Application.CutCopyMode = False
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Range("C4").Select
Selection.Copy
Range("B4").Select
ActiveSheet.Paste
Range("B5").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=DATEVALUE(RC[1])"
Range("B5").Select
Selection.AutoFill Destination:=Range("B5:B1000")
Range("B5:B785").Select
Columns("B:B").Select
Selection.Copy
Columns("C:C").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Selection.NumberFormat = "m/d/yyyy"
Columns("B:B").Select
Selection.Delete Shift:=xlToLeft
Sheets("Statut DA").Select

Sheets("rach21").Select
ActiveWindow.SelectedSheets.Visible = False

Call StatutDA.StatutDA

Joignez votre classeur. Là on ne peut rien voir.