ta as déja ma gratitude ;) je teste et si c'est bon, tu auras un autre :jap:
:hello:
Sylderon
Dim sFichier As String
sFichier = "c:\temp\qqc.txt"
If Dir(sFichier) <> "" Then
Kill sFichier
Endif
frandon
salut,
j'aimerai tester la presence d'un fichier (toujours dans le m dans le m rep) et s'il existe le supprimer.
je ne sais pas comment manier des fichier avec vb( à part active.ducument ect....)
je doit placer cette commande dans une macro autoopen
ps, c'est pas pour un virus
merci
pour prouver que je ne chaume pas, voici les 3 expressions pondues qui ne marchent pas :
Delete.Document FileName:="W:\Edit.txt"
Documents("W:\Edit.txt" ).Delete
Documents.Delete FileName:="W:\Edit.txt"
j'ai fait ça aussi :
Dim Xfichier As String
Set Xfichier = "W:\Edit.txt"
If Document.Exists(Xfichier) = True Then
Kill "W:\Edit.txt"
End If
