Sélection de feuilles à fonction de la valeur d'une cellule

Bonjour à tous,

Je cherche la manière de sélectionner toutes les feuilles d'un classeur à partir de la valeur contenue dans une cellule.

Par exemple, pour un classeur de 100 feuilles, uniquement les feuilles dont la cellule "A1" contient le mot "Equipement" seront sélectionnées.

Merci à l'avance pour votre collaboration,

RD

Bonjour,

Il faut passer par un tableau.

exemple à mettre dans un module et à déclencher par un bouton

Sub TestEquipement()

Dim i%, c%, num() As String
c = 0
For i = 1 To Sheets.Count
If Sheets(i).Range("A1") = "Equipement" Then
    ReDim Preserve num(c)
    num(c) = Sheets(i).Name
    c = c + 1
End If
Next i
ThisWorkbook.Sheets(num).Select
End Sub

Cordialement

Bonjour ddetp88,

Merci d'avoir répondu à ma demande.

Quand j'exécute votre macro insérée dans un module, le message suivant s'affiche :

Erreur d'exécution '1004'

La méthode Select de la classe Sheets a échoué.

Pourriez-vous m'expliquer pourquoi?

Sincères salutations,

RD

Bonsoir,

Pourquoi sélectionner ?

Ce n'est jamais nécessaire pour n'importe quelle opération !

Cela ne sert qu'à afficher, et tu n'afficheras qu'une feuille à la fois.

Cordialement

Bonsoir ddetp88,

Je désire sélectionner les feuilles contenant une valeur précise car je veux supprimer, par la suite, certaines colonnes uniquement dans les feuilles sélectionnées.

Sincères salutations,

RD

Opération inutile pour cela ! tu ferais mieux de programmer la suppression des colonnes...

Bonsoir MFerrand,

Je désire sélectionner les feuilles pertinentes car les colonnes qui devront être supprimées seront programmées ainsi que d'autres opérations seront effectuées sur les feuilles sélectionnées.

Salutations,

RD

Puisque tu persistes à sélectionner ! Sélectionnes !

Tu te rendras compte un jour que ce n'est que du temps perdu inutilement !

Bonjour MFerrand,

Comment pourrait-il faire puisqu'il veut sélectionner des feuilles?

L'erreur semble être un problème de protection des feuilles. Non?

Renaud Dugas,

Est-ce que vos feuilles sont protégées? Avec ou sans mot de passe?

Cordialement

L'erreur est certainement de vouloir sélectionner ?

Quand à l'erreur 1004, c'est une erreur Excel qui refuse de laisser faire ce qu'on demande dans le contexte d'exécution.

La protection n'a jamais empêché de sélectionner une feuille, ce doit donc être autre chose : une feuille masquée par exemple...

Merci pour ton expertise.

Attendons le retour de Renaud DUGAS

Cordialement

Bonjour MFerrand et ddetp88,

Effectivement, MFerrand avait raison. Le problème était causé par une feuille masquée. A présent la macro de ddetp88 fonctionne parfaitement.

Merci à vous deux pour votre aide.

Salutations,

RD