Microsoft 365 Macro à l'ouverture du fichier qui ne fonctionne pas correctement

Sissou71

XLDnaute Occasionnel
Bonjour,
J'ai la macro suivante dans This Workbook et la partie en gras ne fonctionne pas et me renvoie en déboggage chaque fois, quelqu'un saurait-il m'aider à trouver ce qui ne convient pas :

Private Sub Workbook_Open()

'Afficher toutes les données en gardant le filtre dans la feuille Toto
With ThisWorkbook.Worksheets("Toto")
If .FilterMode Then .ShowAllData
End With

'Supprimer le contenu des cellules A2 à Z5000 dans la feuille Tutu
Worksheets("Tutu").Range("A2:Z5000").ClearContent

End Sub
 

Discussions similaires

Réponses
14
Affichages
512
Haut Bas