Microsoft 365 Masquage et Sélection Cellule

[FCMLE44]

Bonjour

J'ai fait ce code

Sub MasqueTP()
    Rows("160:218").EntireRow.Hidden = True 'Masque les lignes 160 à 218 de la feuille active
    Sheets("Salariés").Select 'Sélection de la feuille Salariés
     Range("B66").Select 'Sélection de la cellule B66
End Sub

Lorsque je clique dessus, j'obtiens le message d'erreur suivant
Erreur d'éxécutIon 1004
Erreur définie par l'application ou par l'objet

Quelqu'un aurait il une idée d'où ça peut venir.
Je pense que c'est lors de la sélection de ma cellule B66 de la feuille Salariés

Merci

 

[sylvanu]

Bonsoir FCMLE,
Etes vous certain d'avoir une feuille nommée Salariés ? ( avec l'accent )
Si oui votre macro ne présente pas d'erreur à l'exécution sur mon PC.

 

[FCMLE44]

Oui ma feuille se nomme bien se nomme bien Salariés
Par contre je la lance depuis une feuille "Indemnités"

J'ai essayé de rajouter cela

Sub MasqueTP()
    Sheets("Indemnités").Select
    Rows("160:218").EntireRow.Hidden = True 'Masque les lignes 160 à 218 de la feuille active
    Sheets("Salariés").Select 'Sélection de la feuille Salariés
    Range("B66").Select 'Sélection de la cellule B66
End Sub

Mais ça ne fonctionne toujours pas

 

[FCMLE44]

Non erreur je la lance d'une feuille que j'ai démasqué avant nommée "Indemnités"

'Reconstitution salaire temps plein
Sub DemasqueTP()
    Sheets("Indemnités").Select
    Rows("159:218").EntireRow.Hidden = False
    [A160].Select
End Sub

Sub MasqueTP()
    Rows("160:218").EntireRow.Hidden = True 'Masque les lignes 160 à 218 de la feuille active
    Sheets("Salariés").Select 'Sélection de la feuille Salariés
    Range("B66").Select 'Sélection de la cellule B66
End Sub

 

[FCMLE44]

Désolé je viens de trouver, j'avais laissé mon code sur la mauvaise feuille. Je devais la mettre dans un module

Merci de votre aide

 

[sylvanu]