M
Man02
Guest
Bonjour le forum
Ci joint une formule VBA :
Private Sub CommandButton15_Click()
Workbooks.Open ('D:\\Documents and Settings\\Administrateur\\Mes documents\\center parcs de l'ailette1\\PERSONNEL CHANTIER\\HEURES\\FEUILLES D'HEURES\\S15.xls ')
End Sub
Je voudrai que le S15.XLS tout les lundi devienne +1.
CAD S15 pour cette semine dès le lundi 17/04 devienne S16 ainsi de suite.
Ci joint une formule VBA :
Private Sub CommandButton15_Click()
Workbooks.Open ('D:\\Documents and Settings\\Administrateur\\Mes documents\\center parcs de l'ailette1\\PERSONNEL CHANTIER\\HEURES\\FEUILLES D'HEURES\\S15.xls ')
End Sub
Je voudrai que le S15.XLS tout les lundi devienne +1.
CAD S15 pour cette semine dès le lundi 17/04 devienne S16 ainsi de suite.