correspondance date d'aujourd'hui

[knaekes]

Bonjour,

je souhaite afficher dès l'ouverture du fichier la date d'aujourd'hui, et la reporter dans la ligne correspondante (automatiquement).

Voir fichier joint

comment faire ?

merci pour vote aide

 

[nyko283]

Re : correspondance date d'aujourd'hui

Bonjour à tous,

Avec une formule Si combiné avec une mise en fome conditionnelle

Bonne soirée

 

[Paritec]

Re : correspondance date d'aujourd'hui

Bonsoir Knaekes
ton fichier en retour regardes change la date de ton PC et ouvre le fichier
et redis moi
a+
papou 🙂

EDIT: salut JC

 

[JCGL]

Re : correspondance date d'aujourd'hui

Bonjour à tous,

Un essai avec un bout de code à l'ouverture :

Option Explicit

Private Sub Workbook_Open()
    Sheets("Calendrier").Activate
    Cells(Application.Match(Date * 1, [F1:F2300], 1), 1).Select
    ActiveCell = Format(Date, "dddd dd mmmm yyyy")
End Sub

A+ à tous

Édition : Salut Papou

 

[knaekes]

Re : correspondance date d'aujourd'hui

Merci pour vos réponses, elles fonctionnent toutes