XL 2016 Pour concours ajouter dans les feuilles visibles comme la feuille inscriptions ajouter les feuille Mode d'emploi et feuille tirage en formé

berru76

XLDnaute Occasionnel
Bonjour je voudrais pouvoir modifier la macro ou l'utilitaire
pour avoir en visible la feuille inscriptions / feuille Mode d'emploi / feuille tirage en formé
ci-joint un exemple du fichier
Merci a vous
 
Solution
Bonjour,
Si j'ai compris, remplace ton code par celui-ci

Sub Cadre1_Cliquer()
Call MasquerFeuilles
Dim ws As Worksheet
a = Range("G5")
For Each ws In ThisWorkbook.Worksheets
If ws.Name = "Inscriptions" Or ws.Name = "Mode d'emploi" Or ws.Name = "" & a & "" Then
ws.Visible = xlSheetVisible
End If
Next ws
Sheets("" & a & "").Activate
End Sub

a+

CHALET53

XLDnaute Barbatruc
Bonjour,
Si j'ai compris, remplace ton code par celui-ci

Sub Cadre1_Cliquer()
Call MasquerFeuilles
Dim ws As Worksheet
a = Range("G5")
For Each ws In ThisWorkbook.Worksheets
If ws.Name = "Inscriptions" Or ws.Name = "Mode d'emploi" Or ws.Name = "" & a & "" Then
ws.Visible = xlSheetVisible
End If
Next ws
Sheets("" & a & "").Activate
End Sub

a+
 

Discussions similaires

Réponses
30
Affichages
2 K

Statistiques des forums

Discussions
311 725
Messages
2 081 944
Membres
101 849
dernier inscrit
florentMIG