pb de macro quand la feuille est cachée

  • Initiateur de la discussion Initiateur de la discussion flo2002
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

flo2002

XLDnaute Impliqué
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?
 
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 ...
 
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)
 
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
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

D
  • Question Question
Réponses
5
Affichages
250
Didierpasdoué
D
Retour