sheets.visible

[Evelyne]

Bonjour le forum caldo!

Dans l'aide vba j'ai trouvé
For Each sh In Sheets
sh.Visible = True
next sh
pour afficher d'un coup sans les nommer toutes les feuilles précédemment masquées.

Comment recacher ces mèmes feuilles automatiquement sans les renommer une à une ?
'Sheets("AA").Visible = False
Sheets("BB").Visible = False .etc...

sachant quelles (les feuilles à masquer) commencent toutes dans leurs appelations par # Diese:
#AA ; #BB ; #Machin ; #Truc etc..

j'espère être clair!!
je vous remercis d'avance
et vous souhaite une bonne soirée
Evelyne

 

[@+Thierry]

Hello Evelyne

Simple, d'ailleurs hier dans mon poste j'ai donné le code...

Donc
Sub CacheCache ()
Dim WS as WorkSheets
For Each WS in Sheets
If Left(WS.Name,1) ="#" then WS.Visible = False
Next WS
End Sub

Bonne Soirée
@+Thierry

 

[Evelyne]

bonsoir @+Thierry
je ne suis pas assez callé pour avoir reperer le code!!!
en tout cas Merci je l'applique et on verra
mais j'y crois.......lol
bonne soirée

Evelyne et Francois

 

[@+Thierry]

Arf Arf Arf


Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet



ET PAS Dim WS As Worksheets


Je vais faire 100 lignes çà m'apprendras à filer des codes que je tape directement dans le forum sans tester !!!!


Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet
Dim WS As Worksheet


lol
@+Thierry

 

[jp]

Re-Thierry, Salut notre maître.. (mon nouveau maître)

Tu est vraiment trop...

Bonne nuit, et toi aussi regardes, ce soir, demain et après, les étoiles filantes. Il fait beau, le ciel est pur ou presque et puis c'est la saison.......


Bonne nuit à toi

jp

 

[Evelyne]

regarde ce que j'avais preparer (avant de lire ton post)


bon ben voilà
une fois intégré dans ma macro
ça fonctionne trés bien si je change
dim WS as WorkSheets par Dim WS as Variant
d'ailleur WorkSheets reste noir
et pourquoi Variant ?
Ce n'est certainement pas moi qui vais te l'expliquer
par ce que là ::grand mystere (variant byte etc ????? je coule
à plus
Evelyne et Francois


et suite a la lecture je vais mettre WorkSheet

 

[@+Thierry]

RE Bonsoir JP, et Evelyne

OUi tu as parfaitement raison JP, je vais aller voir un peu les étoiles j'ai lu aussi ton autre post sur la Perse Nord Nord Est.... (je crois !!)

Pour Evelyne je te conseille de regarder ce fil :

Lien supprimé

tu y trouveras des infos, plus un tableau PDF à télécharger.

Pour ce qui est de Variant, oui il prends tout !!! mais il est gourmand en ressource (il est considéré par défaut pour tout variable non déclarée ou mal déclarée)

Bonne nuit "étoilée"

@+Thierry

 

[evelyne]

Merci beaucoup pour tout !!!!
bonne journée @+Thierry
Evelynetfrancois

 

[@+Thierry]

You are Welcome Evelyne et François !

Bonne Semaine

@+Thierry

PS JP doit dormir encore, il a passé la nuit à la belle étoile ;-)