masquer feuille et macro

[valentin75]

bonjour,

Nouveau problème !

J'ai des macros sur plein de feuilles d'un fichier, et je souhaiterais cacher ces feuilles (ça fait pas ranger plein de feuilles). Les macros ne sont plus actives lorsque je les masque avec l'outil d'excel...

Des idées?

Merci bien

Valentin

 

[Pierrot93]

Re : masquer feuille et macro

Re,

Je souhaiterais qu'elle le fasse.

comme déjà dit... envba les "select" ne sont pas utiles. tu peux très bien intervenir sur une feuille sans la selectionner, qu'elle soit masquée ou pas...

 

[valentin75]

Re : masquer feuille et macro

Lorque j'enlève les "select" , il me génère un espace entre Range et la parenthèse suivante qui empêche la macro de fonctionner.

 

[valentin75]

Re : masquer feuille et macro

et il faut que la page soit sélectionné pour afficher les boutons suivants!

 

[Pierrot93]

Re : masquer feuille et macro

Re,

exemple, ceci :

Sheets("NomFeuille").Select
Range("A1").Value = 123

devient :

Sheets("NomFeuille").Range("A1").Value = 123

 

[valentin75]

Re : masquer feuille et macro

Mais a la fin, du code, je serais obligé d'avoir un .Select pour aller sur la feuille, et celui-ci empêchera de la masquer non?

 

[Pierrot93]

Re : masquer feuille et macro

Re,

Mais a la fin, du code, je serais obligé d'avoir un .Select pour aller sur la feuille

bah... vois pas trop pourquoi.... mais si tu veux faire plaisir à l'utilisateur pourquoi pas.... dans ce cas faudra l'afficher propriété "visible" de la feuille...

 

[valentin75]

Re : masquer feuille et macro

Peut on afficher une autre feuille sans .Select?

 

[Pierrot93]

Re : masquer feuille et macro

Re,

si j'ai bien compris :

Sheets("NomFeuille").Visible = True

 

[valentin75]

Re : masquer feuille et macro

!!!! merci je n'y avais pas pensé ! c'est top

 

[Wmerlin]

Re : masquer feuille et macro

salut Valentin,
j'ai eu le meme soucis que toi une macro qui vas chercher des éléments dans toutes les feuilles du classeur
des "select" de feuilles qui plantes sur certain classeur et pas sur d'autre, la raison = des feuilles masqués.

la seule solution que j'ai trouver afficher les feuilles avant de lancer la macro et le re-masquer apres.

maintenant je suis pas un pro mais ça dépanne ( une couleur rouge sur les onglets des feuilles masquer permet de faire la manip sans trop réfléchir)

cordialement

 

[valentin75]

Re : masquer feuille et macro

Oui c'est une bonne idée, je sens que je vais copie colle le code pour masquer apres chaque macro J'essaye ça de suite ! merci du conseil !

Pierrot93, ça fonctionne mais j'ai un souci sur les lignes avec "Range": quand j'enlève le Select, il me cré un espace entre le "Range" et la parenthèse.

Application.ScreenUpdating = False
ActiveSheet.Range("$A$1:$F$999").AutoFilter Field:=5, Criteria1:="Bâti 7 type 1"
Range("A2:F999").Copy
Sheets("Sous Bat7").Visible = True
Range("A2").Select
ActiveSheet.Paste
Sheets("Bâti7").Visible = True
ActiveSheet.Range("$A$1:$F$999").AutoFilter Field:=5
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = " "
Sheets("Sous Bat7").Visible = True
Range("O1").Select
ScreenUpdating = True

 

[Pierrot93]

Re : masquer feuille et macro

Re,

Pierrot93, ça fonctionne mais j'ai un souci sur les lignes avec "Range": quand j'enlève le Select, il me cré un espace entre le "Range" et la parenthèse.

comprends pas... reggarde bien le post #19.... enlève l'espace sinon....

 

[valentin75]

Re : masquer feuille et macro

Je dois filer, je vais travailler dessus ce soir et reviens demain si j'ai des soucis.

J'avais:

Range("A2").Select
ActiveSheet.Paste

Je met donc

Range("A2").ActiveSheet.Paste

Mais ça me met que ça ne fonctionne pas

 

[Pierrot93]

Re : masquer feuille et macro

Re,

normal, faut coder comme ceci :

Range("A2:F999").Copy destination:=Sheets("Sous Bat7").Range("A2")

plus besoin du "paste", tu rends visible la feuille après si tu veux...

 

[valentin75]

Re : masquer feuille et macro

ça fonctionne, mais mais malgré .Visible = True , la feuille ne s'affiche pas :s