# FileCopy et fichier en cours d'utilisation #

[Johann]

Bonjour à vous tous,

voilà j'utilise la macro suivante pour copier 1 fichier en cours d'utilisation :

Sub Macro2()
MaSource = "F:\PrgmFiles\LMV\LMV1.40\Data\channeltable.FF2"
MaDestination = "C:\Documents and Settings\Johann SIMON\Bureau\channeltableRSW.FF2"
FileCopy MaSource, MaDestination
End Sub

Malheureusement puisque ce fichier "Channeltable.FF2" est en cours d'utilisation ma macro ne fonctionne pas !
D'ailleurs j'ai essayé avec l'explorateur Windows c'est la même chose : impossible de copier !!!
Il y a t-il quelqu'un qui connait 1 astuce pour contourner mon obstacle ???

Merci et bonne journée.
Johann

 

[Arnaud]

salut,

essaye avec le CopyFile

Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile source, cible, remplace

 

[Johann]

Au fait (après quelques années) ça ne change rien !

As-tu une autre solution ?

Merci et bye.

 

[Robert]

Bonjour Johann,
Tu peux utiliser les API de windows

Public Declare Function API_SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long

Fais une recherche sur cette API en ajoutant VB et tu trouvera ton boheur...
@+