Sauvegarde sélective de fichiers

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.

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.

:oops: désolé ;)

Bonjour.

Citation:

---

Envoyé par 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à) ?

---

Tu peux faire

Code:

---

Application.ThisWorkbook.Close False 'ou True pour sauvegarder

---

Citation:

---

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

---

Tu peux faire

Code:

---

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

---

Citation:

---

Ais-je été assez clair ?.

---

Oui, chef.

Cordialement,

PGZ

Merci, bonne journée