Bonsoir,
J'aimerais modifier cette ligne de code :
De manière que celui-ci prenne en compte uniquement les cellules suivantes : C1:C46 et I1: i46
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Dim Cel As Range Dim Jour As Integer Dim Mois As Integer Dim Annee As Integer Set Cel = Target.End(xlUp) If Cel.Value = "Date" Then Annee = Year(Date)
Merci de votre aide.
Partager