Pb CopyFile-dossier lecture seule

[etpisculrien]

Bonjour à tous,

n'ayant pas eu de réponse concrète à mon problème précédent, j'essai une autre approche :
Je souhaite copier un fichier et le coller dans un dossier par le code suivant :
----------------------------------------------------------
Dim FSO As Object
Dim appWD As Word.Application

Set FSO = CreateObject("Scripting.FileSystemObject")
Set appWD = CreateObject("Word.Application")
adress = "" & appWD.NormalTemplate.Path
'appWD.Application.Quit
FSO.CopyFile "C:\Documents and Settings\mes documents\macro\chemin d'acces à normal.dot.doc", "" & adress
----------------------------------------------------------
Mon problème est que la commande CopyFile ne fonctionne pas si mon dossier cible est en lecture seule.

Ma question : Y a t'il un moyen de mettre un dossier en lecture ecriture par macro?

Sioux plait, si vous avez un truc, j'dis pas non, je suis en train de m'arracher les cheveux

merci