Discussion :

[babybell]

Bonjour

J'aimerai savoir comment, quand j'ai 4 ou 5 fichiers d'ouverts, sortir :

* soit seulement de celui dans lequel je me trouve en le sauvegardant ou non, sans toucher aux autres(cad qu'ils sont toujours là) ?

* soit de tous en ne sauvegardant que ceux dans lequel je ne suis pas ?

Ais-je été assez clair ?.

Merci de votre aide.

[oOVaveOo]

Bonjour,

Tu peux essayer avec la propriété activeworkbook pour connaitre le classeur actif.

HS dédicace à ton pseudo : 2 chèvres, baby et baba sont sur un bateau, baba tombe à l'eau.
Que se passe t-il ?

baba coule et baby bêle.

désolé

[pgz]

Bonjour.

Bonjour

J'aimerai savoir comment, quand j'ai 4 ou 5 fichiers d'ouverts, sortir :

* soit seulement de celui dans lequel je me trouve en le sauvegardant ou non, sans toucher aux autres(cad qu'ils sont toujours là) ?

Tu peux faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.ThisWorkbook.Close False 'ou True pour sauvegarder

* soit de tous en ne sauvegardant que ceux dans lequel je ne suis pas ?

Tu peux faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim wbk As Excel.Workbook
 
For Each wbk In Application.Workbooks
    If wbk.Name <> Application.ThisWorkbook.Name Then wbk.Close True
Next wbk
 
Application.ThisWorkbook.Close False
Application.Quit

Ais-je été assez clair ?.

Oui, chef.

Cordialement,

PGZ

[babybell]

Merci, bonne journée