flo2002
XLDnaute Impliqué
Re bonjour à tous,
petit probleme lié à des fermetures de fichiers.
voici le code:
ActiveWorkbook.Save
Dim ZZZ As String, VVV As String
ZZZ = Sheets("Garde").Range("B5").Value
VVV = Format(Date, "yymmdd") & Format(Time, "hhmmss") & ZZZ
ActiveWorkbook.SaveAs VVV
Workbooks.Open Filename = ZZZ
Workbooks.Close Filename = VVV
le probleme est de pourvoir enregistrer le fichier avec un nouveau nom puis ouvrir le fichier avec le nom de base ZZZ, a ce moment on a deux classeur ouvert puis fermer la nouvelle version VVV.
Mais la ya des pb on dirai!
une idée?
merci
petit probleme lié à des fermetures de fichiers.
voici le code:
ActiveWorkbook.Save
Dim ZZZ As String, VVV As String
ZZZ = Sheets("Garde").Range("B5").Value
VVV = Format(Date, "yymmdd") & Format(Time, "hhmmss") & ZZZ
ActiveWorkbook.SaveAs VVV
Workbooks.Open Filename = ZZZ
Workbooks.Close Filename = VVV
le probleme est de pourvoir enregistrer le fichier avec un nouveau nom puis ouvrir le fichier avec le nom de base ZZZ, a ce moment on a deux classeur ouvert puis fermer la nouvelle version VVV.
Mais la ya des pb on dirai!
une idée?
merci