Microsoft 365 Masquage et Sélection Cellule

  • Initiateur de la discussion Initiateur de la discussion FCMLE44
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

FCMLE44

XLDnaute Impliqué
Bonjour

J'ai fait ce code
VB:
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
 
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
VB:
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
 
Non erreur je la lance d'une feuille que j'ai démasqué avant nommée "Indemnités"

Code:
'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
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
454
Retour