bonjour
si ton fichier est en lecture seule, le message d'alerte avant suppression sera différent, peut-être qu'il ira moins facilement se promener dans la corbeille.
tu peux aussi envisager de le transformer en fichier système. je pense que tu auras plus de mal à l'effacer.
tu peux aussi le mettre en lecture seule, en fichier système et le cacher ...
un petit exemple par macro
'Il suffit simplement de faire l'opération à l'envert
Sub ModifAttribPlus()
Dim MyFile As String
'
MyFile = 'C:\\Documents and Settings\\Sroyer\\Bureau\\Nouveau Document texte.txt'
If Dir(MyFile, vbNormal Or vbReadOnly Or vbHidden Or vbSystem Or vbArchive) = '' Then
Call MsgBox('Erreur, désolé! Le fichier de sauvegarde n' existe pas!')
Exit Sub
Else
'Le fichier existe, Affiche l'attibut!
myattr = GetAttr(MyFile)
'Modifier l' attribut système en fichier caché et en lecture seule
SetAttr MyFile, vbHidden + vbReadOnly '+ vbSystem
End If
End Sub
trouve la
Ce lien n'existe plus