Bonsoir,

Je voudrai solliciter votre aide pour la problématique ci-dessous:

j'ai tenté une macro qui me permet de détecter le numéro de la semaine en cours et se déplacer d'une case à gauche et de 2 cases en bas. Ci-joint l'exemple (la cellule en jaune est celle que je veux sélectionner) mais je ne sais pas pourquoi ça ne marche pas

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub Workbook_Open()
Dim cellule As Range
For Each cellule In Sheets("Feuil1").Range("A1:N1")
If cellule = Date Then
Cells(1, cellule.Column).Offset(rowOffset:=1, columnOffset:=-1).Select
End If
Next cellule
End Sub
Classeur1.xlsm