pb de macro quand la feuille est cachée

[flo2002]

j'ai une macro qui fait intervenir diverse feuille. Je voudrai' cacher l'une de ces feuilles sans que ma macro ce sente mal.


De meme si j'ai des formules qui font reference a cette feuille va t il y avoir des problemes?

 

[PascalXLD]

Bonjour

Et bien alors FLo on oublie les bonnes manières ??? B)

 

[flo2002]

Je suis désolé je ne vois pas de quel bonne manière vous parlez?

 

[Dull]

Re flo, Re Pascal, Re José, et Re Re Re le Forum,

Vraiment tu ne vois pas ?

Edit: Que dire du p'tit Robert

Message édité par: Dull, à: 11/05/2006 13:47

 

[flo2002]

Il me semble dire bonjour tous les matins!
de même je dis merci autant que je le peux mais ma mémoire doit me jouer des tours et quand je reprends le travail le matin j'ai souvent oublier ce que j'ai fait la veille.

Cependant je m'excuse car il est vrai que de ne pas recevoire un merci mérité est frustrant!

Donc ...

 

[PascalXLD]

Re

Flo je t'ai envoyé un message en privé

Bonne journée

 

[flo2002]

Merci j'avais pas vu.

 

[PascalXLD]

RE

Pour répondre à ta question si tu évites les select ce qui est souvent possible le fait de cacher une feuille ne gènera pas ta macro

 

[flo2002]

Merci mais je pense qu'il sont indispensable puisque je selectionne une plage.

 

[PascalXLD]

RE

Tout depend pourquoi tu la selectionnes.
QUe fais-tu de ta selection ensuite ??

 

[flo2002]

Sheets('AAA').Select
Dim VotreNom As String
Range('C200').Select
Selection.End(xlUp).Offset(1, 0).Select
VotreNom = InputBox(' xxx..
ActiveCell.Value = VotreNom
Columns('c:c').Select
Range('c200').Activate
Selection.Sort Key1:=Range('c2'), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

sachant que la feuille AAA est caché (enfin c'est un souhait)

 

[PascalXLD]

RE

Bon pour la première partie on pourrait éviter le select maispour le tri je crois pas

alors proposition

application.screenupdating=false
sheets('AAA').visible=true
Sheets('AAA').Select
Dim VotreNom As String
Range('C200').Select
Selection.End(xlUp).Offset(1, 0).Select
VotreNom = InputBox(' xxx..
ActiveCell.Value = VotreNom
Columns('c:c').Select
Range('c200').Activate
Selection.Sort Key1:=Range('c2'), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

sheets('AAA').visible=false
'ou au choix
'sheets('AAA').visible=xlveryhidden
application.screenupdating=true

Message édité par: Pascal76, à: 11/05/2006 15:14

 

[flo2002]

En faite on démasquerai la feuille le temps d'effectuer la macro? C'est bien ca?

Merci beaucoup en attendant!

 

[PascalXLD]

Re

Oui mais ce serait invisible

 

[flo2002]

merci beaucoup je vais tester ca et l'appliquer au n macro qui sont concerné!


Ca marche comme sur des roulettes!!

merci!

Message édité par: flo2002, à: 11/05/2006 15:23