Bonjour à tous et bonne année (il est encore temps),
voici mon problème toute aide serait bienvenue :
j'ai une feuille avec des dates dans la colonne A.
j'aimerais que lorsque j'arrive sur cette feuille, la cellule adjacente à la date d'aujourd'hui (donc colonne B), soit activée afin que je n'aie plus qu'à remplir mes données au bon endroit.
J'ai trouvé l'evénement 'quand activer feuille' mais pour la suite je galère je vous met le pauv'code que j'ai pu faire :
Private Sub Worksheet_Activate()
Dim c As Range
With ActiveSheet.Range('a5:a49')
Set c = .Find(today, LookIn:=xlValues)
ActiveCell = Offset(1, 0)
End With
End Sub
Merci beaucoup de votre aide, à bientôt
voici mon problème toute aide serait bienvenue :
j'ai une feuille avec des dates dans la colonne A.
j'aimerais que lorsque j'arrive sur cette feuille, la cellule adjacente à la date d'aujourd'hui (donc colonne B), soit activée afin que je n'aie plus qu'à remplir mes données au bon endroit.
J'ai trouvé l'evénement 'quand activer feuille' mais pour la suite je galère je vous met le pauv'code que j'ai pu faire :
Private Sub Worksheet_Activate()
Dim c As Range
With ActiveSheet.Range('a5:a49')
Set c = .Find(today, LookIn:=xlValues)
ActiveCell = Offset(1, 0)
End With
End Sub
Merci beaucoup de votre aide, à bientôt