Excel erreur exécution 1004

Bonjour,
J'ai créé un fichier excel avec une macro mais elle ne fonctionne pas j'ai le message d'erreur suivant : La méthode Select de la classe Worksheet a échoué.

J'ai du masquer des onglets dans mon excel et je pense que c'est ce qui fait échouer la macro car quand j'affiche les onglets la macro fonctionne.

Voici ce qu'y apparaît dans le module code :
Sheets("Architecture provisoire").Select
Columns("A:A").Select
Range("A96").Activate
ActiveWorkbook.Worksheets("Architecture provisoire").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Architecture provisoire").Sort.SortFields.Add Key _
:=Range("A96"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("Architecture provisoire").Sort
.SetRange Range("A2:E220")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With

Pouvez-vous m'aider svp ? :)

Merci d'avance

Servane