VBA Excel - Suppression impossible de fichier

chithien -  
 chithien -
Bonjour,

Je cherche à créer une macro Excel me permettant de supprimer un fichier après avoir fait des manipulations là-dessus (création et écriture), j'ai donc utilisé les syntaxes tels que :

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile("c:\fichier.xls")
f.Delete

ou encore kill "..."

mais lorsque j'exécute la macro, elle me renvoir ce message d'erreur :
"Erreur d'exécution '70':
Permission refusée"

Comment faire pour ne plus avoir ce message et ainsi pouvoir supprimer le fichier ?

Merci de votre aide.
Configuration: Windows XP
Internet Explorer 6.0

1 réponse

  1. chithien
     
    Voici ce que j'ai écrit :

    Sub Test()

    Set FSys = CreateObject("Scripting.FileSystemObject")
    Set MonFic = FSys.CreateTextFile("C:\Documents and Settings\ZRLF8833\Mes documents\Test\Temp.txt")
    Kill "C:\Documents and Settings\ZRLF8833\Mes documents\Test\Temp.txt"

    End Sub

    Merci d'avance de votre aide.
    1