insertion de la date a l'ouverture du fichier (Excel)!!

insertion de la date a l'ouverture du fichier (Excel)!! - XML/XSL - Programmation

Marsh Posté le 25-10-2004 à 09:42:44    

Bonjour à tous, voilà je voudrai savoir si il est possible de faire que à l'ouverture d'un fichier Excel et bien est il possible que la date du jour vienne s'inserer toute seule dans une cellule ?
 
Ben si quelqu'un pouvait m'aider ca m'arrangerai bien.
Merci à tous
Jérôme

Reply

Marsh Posté le 25-10-2004 à 09:42:44   

Reply

Marsh Posté le 26-10-2004 à 13:19:03    

Sous excel fait alt+F11 pour avoir la fenetre d'edition VB
 
Dans la fenetre VBA project choisit
le fichier thisWorbook dans le repertoire
Microsoft Excel Object
 
et insere le code suivant
 
Private Sub Workbook_Open()
    Range("C17" ).Select
    ActiveCell.FormulaR1C1 = "=TODAY()"
End Sub
 
La sub Workbook_Open() est lancé à l'ouverture du fichier
Range te permet de selection la cellule
ActiveCell d'y mettre la date
 
A+  :bounce:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed