Enregistrer les modifications sans confirmation

Bonjour,

Je voulais savoir, si il était possible d'enregistrer les modifications apportées dans un fichier excel sans demander de confirmation?

J'utilise la commande :

Code:

---

1 2 3

oApp.activeworkbook.Save oApp.workbooks.Close

---

Mais il m'ouvre la fenêtre d'enregistrement. Si je clique sur "oui" c'est ok, par contre si je clique sur "non" ou sur "annuler" il me met un message d'erreur comme quoi le fichier est en lecture seule.

Quelqu'un a t-il une idée?

Merci d'avance.

Bonjour,

Pas testé

Essai avant ton code

Code:

---

Application.displayalerts = false

---

Apres le code

Code:

---

application.displayalerts = true

---

bonjour Ptikir aalex_38 le forum peut être comme cela!!

Code:

---

1 2 3 4

On Error Resume Next ActiveWorkbook.SaveAs On Error GoTo 0 oApp.workbooks.Close

---

ou

Code:

---

1 2 3 4

On Error Resume Next oApp.activeworkbook.Save On Error GoTo 0 oApp.workbooks.Close

---

En mettant :

Code:

---

1 2 3 4

oApp.displayalerts = False oApp.activeworkbook.Save oApp.displayalerts = True

---

Je n'ai plus d'alertes c'est ce que je veux.

Merci à toi !

Bon puisque c'est résolu, c'est parfait, juste un code auquel je n'avais pas pensé hier :

Code:

---

Workbooks(NomFic).Close savechanges:=False

---