problème avec CopyFile, FileSystemObject, virgule cas nom de chemin des problèmes

Question

je peux créer avec succès des répertoires de dossiers avec des virgules inclus dans le nom à l'aide FileSystemObject

Le problème que j'ai est si une virgule est inclus dans le nom du répertoire Je ne peux pas utiliser 'CopyFile' avec ce nom de chemin. La sous routine que j'utilise est inférieure

Sub CopyFiles(sDoc As String, dDoc As String) 
Dim fso As New FileSystemObject 
    fso.CopyFile sDoc, dDoc, False 
Set fso = Nothing 
End Sub 

Je ne peux pas vraiment éviter l'utilisation de virgules, comment puis-je empêcher cela d'être un problème?

Merci d'avance pour toute aide.

Vive

Noel

Answer 1

citations: Que diriez-vous

fso.CopyFile """" & sDoc & """", """" & dDoc & """", False