Perdu une feuille

[flo2002]

Re bonjour le forum!

Une chose étrange vien de m'arriver.

J'ai une modification à faire dans une feuille caché, lié par des macros et des formules.

Cependant je ne la retrouve pas!!
est ce du à un code de ce type:

Sheets('AFU').Visible = xlVeryHidden
Application.ScreenUpdating = True

Merci par avance

 

[Adeus33]

Bonjour

Pour la retrouver tu peux faire
Menu --> Format --> feuille --> afficher

Ou sinon le code:

Sheets('AFU').visible = true

la feuille doit etre visible avant que tu ten serve dans ta macro

 

[Dan]

Bonjour,

Si tu es sous windows vérifies ceci :

- vas dans VBA par ALT + F11
- CTRL + R pour accéder à VBA Project
- Menu / affichage et clique sur Propriétés
- Dans VAB Project clique sur la feuille ATU
- Dans la fenetre Prorpiétés de la feuille tu verras une rubrique VISIBLE
- Sélectionne la cellule à droite pour accéder à la liste déroulante et choisis l'option correcte.

Si pb n'héiste pas

 

[flo2002]

donc le pb vient bien de la macro!
mais comment dois je faire pour qu'il me la masque mais que je puisse y avoir accès si necessaire!

merci deja de vos lumieres!

 

[Dan]

Re,

bon faudrait comprendre ce que tu veux faire exactement dans ton appli. Sinon dans l'instruction que tu as donnée ci-avant, tu dois simplement faire passer la valeur TRUE à FALSE.

 

[Adeus33]

RE

Lorsque tu rend invible une feuille tu ne peux plus faire de calcul dessus, tu dois la rendre visible pour cela, a l'aide de l'instruction suivante:

Sheets('AFU').visible = true

Puis par la suite tu peux la remettre en invisible:

Sheets('AFU').visible = false

Adeus

 

[flo2002]

Quand tu dis calcul tu entends macro car je n'est pas de probleme avec les formule a premiere vu.

Pour mes macros je fais apparaitre la feuille puis la fait disparaitre (mais pas comme il faut il semble)


Sheets('AFU').Visible = xlVeryHidden
Application.ScreenUpdating = True

 

[Adeus33]

RE
Si dans ta macro tu fais appel a un moment donné d'information contenu sur une feuille, il faut que cette feuille soit visible, si elle est invisible il te marquera une erreur

 

[flo2002]

ca je suis d'accord c'est pour cela que en debut de macro je la fait apparaitre et que en fin je la masque.

Mais le probleme reside dans la maniere de la masquer.

 

[Adeus33]

Le mieux est que tu nous mettes ton code en entier parce que je te suis pas trop la

 

[flo2002]

Sub Ajouter_Activity()


Application.ScreenUpdating = False
Sheets('AFU').Visible = True
Sheets('AFU').Select
Dim VotreNom As String
Range('C200').Select
Selection.End(xlUp).Offset(1, 0).Select
VotreNom = InputBox(' Entrer Le Nom De L'activité (Version AFU)')
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('AFU').Visible = xlVeryHidden
Application.ScreenUpdating = True
Sheets('Garde').Select


End Sub

voici un exemple

merci d'avance

 

[Adeus33]

Ca fonctionne tres bien.
Qu'est ce qu'il ne va pas?
[file name=TEST_20060511174021.zip size=8882]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/TEST_20060511174021.zip[/file]

 

[flo2002]

quand on lance la macro la feuille afu se cache bien, meme trop bien je dirai. Quand je fait format feuille afficher et bien elle n'y est pas ce qui est ennuyant pour faire une modification dessus.

 

[Adeus33]

Le xlVeryHidden signifie qu'il est tres caché lol
tu peux le rendre visible qu'avec une macro ou comme te la dis Dan tout a l'heure
En fait tout a l'heure je me suis trompé car quand tu le met en invible de cette manière, tu ne peux pas le retrouver comme :
Menu --> Format --> feuille --> afficher


Si non je vois pas ou est le probleme

Voila bon courage

 

[Adeus33]

Si tu veux pas qu'il soit caché comme ca:
modifie le xlVeryHidden par false
et tu pourra retrouver la feuille en faisant

Menu --> Format --> feuille --> afficher