Bonjour à tous,
Je cherche à déplacer un fichier d'un dossier à un autre pour l'archiver.
Pour ce faire, j'ai tenté un code avec le fonction FileCopy/Kill.
Le nom de mon fichier évolue chaque mois en fonction de la date actuelle.
Il est au format CR ACC 07-09 to 06-10.
Malheureusement, mon code ne focntionne pas car il ne trouve pas le fichier alors qu'il est dans le dossier.
Merci d'avance pour votre aide.
Je cherche à déplacer un fichier d'un dossier à un autre pour l'archiver.
Pour ce faire, j'ai tenté un code avec le fonction FileCopy/Kill.
Le nom de mon fichier évolue chaque mois en fonction de la date actuelle.
Il est au format CR ACC 07-09 to 06-10.
Malheureusement, mon code ne focntionne pas car il ne trouve pas le fichier alors qu'il est dans le dossier.
PHP:
Sub macroarchiver()
Dim NomFic As String
Dim DateDeb As Date
Dim DateFin As Date
DateDeb = DateSerial(year(Date) - 1, Month(Date) - 1, 1)
DateFin = DateSerial(year(Date), Month(Date) - 2, 1)
NomFic = "CR ACC " & Format(DateDeb, "MM-YY") & " to " & Format(DateFin, "MM-YY")
FileCopy "\\gol9\lbhkh\macro analysis\fichier CR\NomFic.xls", _
"\\gol9\lbhkh\macro analysis\fichier CR\Archives\NomFic.xls "
Kill "\\gol9\lbhkh\macro analysis\fichier CR\NomFic"
End Sub
Merci d'avance pour votre aide.