liens hypertexte

[Victor]

Bonjour le forum,
comment faire pour dire à un bouton de se rendre dans la feuille 1 dans la colonne après la date du jour, le problème est la formule à faire pour qu'il comprenne qu'il doit se rendre dans la colonne B à côté de la date aujourd'hui, qui sera dans la colonne A. Merci à vous.

 

[Zon]

Salut,


Quelque chose du style à coller dans un module standard:


Sub RechDateduJour()
Dim C As Range
With Sheets(1).Columns(1) 'à adapter ou utilise sheets("lenomdelaFeuiille")
Set C = .Find(Date, , xlValues)
If Not C Is Nothing Then .Activate: Range(C.Address).Offset(0, 1).Select
End With
End Sub


A+++

 

[Zon]

Re,

J'ai une heure de retard lol