Bonjour a tous
J'ai fait une macro (qui fonctionne parfaitement ). Elle copie colle et enregistre un de mes onglets de mon workbook excel sous le lecteur Z. Voici le code
Le probleme et oui il y en a un c'est que l'onglet est enregistré sous Avril 2012\20120416 (20120416 signifie le 16 Avril 2012). Mais le lendemain je vais devoir enregistrer le même onglet excel sous 20120417 (17 Avril 2012) et le surlendemain le même sous 20120418 (bref c'est judicieux ).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23 Sub copiecollevaleur1() Sheets("confirm 1").Select Sheets("confirm 1").Copy Cells.Select Range("A4").Activate Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False NomFichier = Range("O7") & "_" & Range("O8") & "_" & Range("O12") & "_" & Range("O14") ActiveWorkbook.SaveAs Filename:= _ "Z:\Risques et documentation OPCVM\Rapprochement Front Back\Confirmation Trades\Avril 2012\20120416\" & NomFichier & ".xls" _ , FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False ActiveWindow.Close End Sub
Et donc dans ma macro si dessus l'onglet est toujours enregistré sous ...Avril 2012\20120416. Comment faire pour que quotidiennement le dernier argument de mon chemin (a savoir 20120416) change de lui même??
J'espere que j'ai été clair?
Bonne journée a tous et Merci d'avance
Partager