modification code vba

Bonsoir,
J'aimerais modifier cette ligne de code :

Code:

---

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)

---

De manière que celui-ci prenne en compte uniquement les cellules suivantes : C1:C46 et I1: i46

Merci de votre aide.:)