Bonjour,
Je dispose d'une macro qui génère un fichier par ligne dans une base de données.
En l'état actuel des choses, je crée un dossier "général" dans lequel tous les fichiers sont stockés dedans.
Seulement, j'aimerais que chaque fichier soit stockés dans un dossier propre afin d'y mettre d'autres fichiers par la suite:
Structure actuelle : Dossier principal/(Fichier1, Fichier2, ....)
Structure désirée: Dossier principal/
Dossier Fichier 1 / Fichier 1
Dossier Fichier 2 / Fichier 2
Voici la partie du code s'occupant de la sauvegarde:
If Dir(Path & "\Output" & "\Main_Folder" & "\rID_fichier.value", vbDirectory) <> "" Then
wkbTemp.SaveAs Filename:=Path & "\Output" & "\Main_Folder\" & "rID_fichier.value\" & rNomFichier.Value, FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
wkbTemp.Close SaveChanges:=False
Else
FSO.CreateFolder (Path & "\Output" & "\Main_Folder" & "\rID_fichier.value")
wkbTemp.SaveAs Filename:=Path & "\Output" & "\Main_Folder\" & "rID_fichier.value\" & rNomFichier.Value, FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
wkbTemp.Close SaveChanges:=False
End If
J'obtiens l'erreur "Path not found". Sauriez-vous me dire ce qui est faux?
Merci beaucoup pour votre aide