Tout est dans le zip
Télécharger le zip
pour que ça marche tu mets ça :Private Sub btnCopie_Click() FichierC = txtDestination.Text ' à la place de FichierC = FichierB FichierB = txtSource.Text ' et cette ligne pour faire pareil If CopyFile(FichierB, FichierC, progress) Then _ MsgBox "Fichier copié !", vbInformation + vbOKOnly, "NewsCopyFile" End SubNe l'aurais tu pas fais exprès ... êtrange
Excelent merci infiniment
10/10
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte