VBA Afficher masquer un fichier

Pierrot93

XLDnaute Barbatruc

• 26 Décembre 2012

• #2

Re : VBA Afficher masquer un fichier

Bonjour Michel🙂

peut être comme ceci, si j'ai bien compris :

Code:

Dim w As Window
For Each w In Windows
    If Not w.Visible Then MsgBox w.Caption
Next w

bon après midi
@+

 

Vote positif 0 Vote négatif

Papou-net

XLDnaute Barbatruc

• 26 Décembre 2012

• #3

Re : VBA Afficher masquer un fichier

Bonjour Michel, Pierrot, le Forum,

Apparemment, l'exemple de Pierrot affiche le classeur actif.

Je proposerais plutôt :

Code:

For Each wb In Workbooks
  If Not wb Is ActiveWorkbook Then MsgBox wb.Name
Next

qui affiche les classeurs inactifs.

Cordialement.

Edit : Oups, j'ai dit une bêtise. Ca m'étonnait aussi de la part de Pierrot (c'est pourquoi j'avais bien dit "apparemment").
J'annule.

 

Dernière édition: 26 Décembre 2012

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Décembre 2012

• #4

Re : VBA Afficher masquer un fichier

Re, bonjour Papou

Apparemment, l'exemple de Pierrot affiche le classeur actif.

Cliquez pour agrandir...

euh... bah non... enfin pas chez moi sous 2003 me renvoie bien le nom de mon classeur perso qui est masqué...

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 26 Décembre 2012

• #5

Re : VBA Afficher masquer un fichier

Bonjour Pierrot, Papou

Merci pour vos réponses mais qui ne sont pas tout à fait ce que je veux faire. Je suis en train de refaire mon planning pour l'année prochaine qui devenait un peu chargé (trop de macros 😱). Et je voudrais remplacer mes anciennes macros XL4 que j'avais.

Voici mes codes pour masquer et afficher un classeur , mais en VBA, ce n'a pas l'air si simple 😕. Voici aussi l'image de la fenètre afficher:

[TABLE="width: 1167"]
[TR]
[TD]Masquer_m[/TD]
[/TR]
[TR]
[TD]=MASQUER()[/TD]
[/TR]
[TR]
[TD]=RETOUR()[/TD]
[/TR]
[TR]
[TD]Afficher_M[/TD]
[/TR]
[TR]
[TD]=AFFICHER?()[/TD]
[/TR]
[TR]
[TD]=RETOUR()[/TD]
[/TR]
[/TABLE]

Cliquez pour agrandir...

Si cela vous parle 🙂.

 

Pièces jointes

• Afficher.jpg

  26.5 KB · Affichages: 81
• Afficher.jpg

  26.5 KB · Affichages: 77

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Décembre 2012

• #6

Re : VBA Afficher masquer un fichier

Re,

pas tout compris et connais pas les macros xl4..; mais pour afficher un classeur masqué :

Code:

Windows("Perso.xls").Visible = True

pour le masquer :

Code:

Windows("Perso.xls").Visible = False

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 26 Décembre 2012

• #7

Re : VBA Afficher masquer un fichier

Re

Merci Pierrot 🙂.

Je pense que j'ai trouvé une piste:

Code:

Application.CommandBars.FindControl(ID:=866).Execute

Bonne Fêtes de fin d'année 🙂.

En espérant que 2013 sera plus calme sur XLD que la fin 2012 😱.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Décembre 2012

• #8

Re : VBA Afficher masquer un fichier

Re,

bonnes fêtes de fin d'année à toi également et à Papou et aux autres....

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Décembre 2012

• #9

Re : VBA Afficher masquer un fichier

Re,

aarf..; oublié de te dire, tu as aussi la méthode "ExecuteExcel4Macro" pour lancer une macro excel4... A voir... 🙂

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 26 Décembre 2012

• #10

Re : VBA Afficher masquer un fichier

Re

Code:

aarf..; oublié de te dire, tu as aussi la méthode "ExecuteExcel4Macro" pour lancer une macro excel4... A voir... :)

Ah, merci Pierrot, c'est super 🙂🙂🙂.

Code:

ExecuteExcel4Macro ("unhide?()")

 

Vote positif 0 Vote négatif