Au moment de fermer mon classeur, j'ai un message "erreur d'execution 1004"
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Cejour As Date
Dim Dat As String
Cejour = Date
Dat = Format(Cejour, "dddd dd/mm/yyyy")
ThisWorkbook.Save
ActiveWorkbook.SaveCopyAs "E:\Filiere\Sauvegarde du " & Dat & ".xls"
Lorsque je remplace "E:\Filiere\Sauvegarde du " & Dat & ".xls" par
"E:\Filiere\Sauvegarde.xls", aucun probleme.
Je ne comprends pas pourquoi ?
Merci d'avance
Reda
--
Use our news server 'news.foorum.com' from anywhere.
More details at: http://nnrpinfo.go.foorum.com/
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
AndréB
Bonjour Peut-être sur le forum Excel ? AB
Bonjour,
Au moment de fermer mon classeur, j'ai un message "erreur d'execution 1004"
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim Cejour As Date Dim Dat As String Cejour = Date Dat = Format(Cejour, "dddd dd/mm/yyyy") ThisWorkbook.Save ActiveWorkbook.SaveCopyAs "E:FiliereSauvegarde du " & Dat & ".xls"
Lorsque je remplace "E:FiliereSauvegarde du " & Dat & ".xls" par "E:FiliereSauvegarde.xls", aucun probleme. Je ne comprends pas pourquoi ? Merci d'avance Reda
Bonjour
Peut-être sur le forum Excel ?
AB
Bonjour,
Au moment de fermer mon classeur, j'ai un message "erreur d'execution 1004"
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Cejour As Date
Dim Dat As String
Cejour = Date
Dat = Format(Cejour, "dddd dd/mm/yyyy")
ThisWorkbook.Save
ActiveWorkbook.SaveCopyAs "E:FiliereSauvegarde du " & Dat & ".xls"
Lorsque je remplace "E:FiliereSauvegarde du " & Dat & ".xls" par
"E:FiliereSauvegarde.xls", aucun probleme.
Je ne comprends pas pourquoi ?
Merci d'avance
Reda
Au moment de fermer mon classeur, j'ai un message "erreur d'execution 1004"
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim Cejour As Date Dim Dat As String Cejour = Date Dat = Format(Cejour, "dddd dd/mm/yyyy") ThisWorkbook.Save ActiveWorkbook.SaveCopyAs "E:FiliereSauvegarde du " & Dat & ".xls"
Lorsque je remplace "E:FiliereSauvegarde du " & Dat & ".xls" par "E:FiliereSauvegarde.xls", aucun probleme. Je ne comprends pas pourquoi ? Merci d'avance Reda
FxM
Bonjour André,
reda a trouvé seul(e) la solution une heure après avoir posé la question sur mpfe : le caractère / est interdit dans un nom de fichier.
@+ FxM
Bonjour Peut-être sur le forum Excel ? AB
Bonjour,
Au moment de fermer mon classeur, j'ai un message "erreur d'execution 1004"
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim Cejour As Date Dim Dat As String Cejour = Date Dat = Format(Cejour, "dddd dd/mm/yyyy") ThisWorkbook.Save ActiveWorkbook.SaveCopyAs "E:FiliereSauvegarde du " & Dat & ".xls"
Lorsque je remplace "E:FiliereSauvegarde du " & Dat & ".xls" par "E:FiliereSauvegarde.xls", aucun probleme. Je ne comprends pas pourquoi ? Merci d'avance Reda
Bonjour André,
reda a trouvé seul(e) la solution une heure après avoir posé la question
sur mpfe : le caractère / est interdit dans un nom de fichier.
@+
FxM
Bonjour
Peut-être sur le forum Excel ?
AB
Bonjour,
Au moment de fermer mon classeur, j'ai un message "erreur d'execution
1004"
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Cejour As Date
Dim Dat As String
Cejour = Date
Dat = Format(Cejour, "dddd dd/mm/yyyy")
ThisWorkbook.Save
ActiveWorkbook.SaveCopyAs "E:FiliereSauvegarde du " & Dat & ".xls"
Lorsque je remplace "E:FiliereSauvegarde du " & Dat & ".xls" par
"E:FiliereSauvegarde.xls", aucun probleme.
Je ne comprends pas pourquoi ?
Merci d'avance
Reda
reda a trouvé seul(e) la solution une heure après avoir posé la question sur mpfe : le caractère / est interdit dans un nom de fichier.
@+ FxM
Bonjour Peut-être sur le forum Excel ? AB
Bonjour,
Au moment de fermer mon classeur, j'ai un message "erreur d'execution 1004"
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim Cejour As Date Dim Dat As String Cejour = Date Dat = Format(Cejour, "dddd dd/mm/yyyy") ThisWorkbook.Save ActiveWorkbook.SaveCopyAs "E:FiliereSauvegarde du " & Dat & ".xls"
Lorsque je remplace "E:FiliereSauvegarde du " & Dat & ".xls" par "E:FiliereSauvegarde.xls", aucun probleme. Je ne comprends pas pourquoi ? Merci d'avance Reda