Supprimer un fichier texte via VBA

Bonjour,

dans ma feuille excel, j'ai un bouton qui execute une macro. Quand je clique dessus, il me cree un fichier texte tel que :

Code:

---

1 2 3

Dim r As FileSystemObject Set r = New FileSystemObject r.CreateTextFile "C:\Documents and Settings\z70914\Desktop\AK-TEST\Creer_Utilisateur.txt"

---

J'ai un autre bouton qui lui doit faire le contraire, c'est a dire supprimer completement le fichier texte la ou il est placé et non pas seulement vider son contenu.

J'ai essayer avec Kill mais cela vide uniquement le fichier. J'ai aussi essayer ceci :

Code:

---

1 2 3

Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFile("C:\Documents and Settings\z70914\Desktop\AK-TEST\Connect_Procedure.txt") f.delete

---

mais la il me donne un run-time error 70 : Permission Denied

Avez vous une idee svp ?

Merci d'avance ;)

C'est bon j'ai trouve. La fonction Kill fait bien le travail. Le probleme c'est que le fichier etait encore ouvert et ne voulait pas le supprimer lorsqu'il est ouvert.

Je ferme donc le fichier avec Close #1, et en utilisant Kill ensuite, le fichier est detruit sans probleme.

Merci tout de meme pour votre temps. :yaisse2::king: