no save
Assistance
Achat
News

Forum | programmation
VBA Excel Modification de la date en fonction
a.dequidt, le jeu. 06 sept. 2007 à 09:30:53
Salut,

Je cherche a ce qu'a l'ouverture de mon classeur, si celui ci possede le nom "logiciel_offre.xls", on affecte aux cellules C12 et D13 la date d'aujourdhui:


Private Sub Workbook_Open()

Dim ToDay As Date
If ActiveWorkbook.Name = "Logiciel_offres_v8.xls" Then
Range("C12:E12").Select
ActiveCell.FormulaR1C1 = "=TODAY()"
Range("D13").Select
ActiveCell.FormulaR1C1 = "=TODAY()"
End If
End Sub


Et je voudrais qu'a l'ouverture d'une coipe de ce fichier, la date ne soit pas celle d'aujourd'hui mais celle de la création de ce fichier Configuration: Windows 2000
Internet Explorer 6.0


Papou93
sept. 07
Suivant
REPONSES
Papou93
sept. 07
a.dequidt
sept. 07
Papou93
sept. 07
Version Web
Réalisé par RedShift
no save