Condition par semaine

Bonjour a tous !

(Fichier XLS founis)

Voila ma condition :
Msgbox si : Sport dans la meme ville dans le mois en cours superieur a 1 par semaine

Je ne sait pas trop comment mis prendre, je suis completement perdu !

Merci a vous !
:oops::king:

Merci pour ta reponse, jfontaine m'a aidé pour ce post :
http://www.developpez.net/forums/sho...d.php?t=461744

Est-ce combinable ? ( Le fichier test a un peu changé, au niveau des colonnes)

Merci (dsl je n'y connais pas grand chose en VBA ..)

PS: j'ai reussi a avoir les intervalles des semaines :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

getlundi1 = DateAdd("ww", Week, CDate("01/01/" & année)) - Weekday(CDate("01/01/" & année)) + 2 getdimanche1 = DateAdd("d", 6, getlundi1)     GetLundi2 = DateAdd("ww", Week + 1, CDate("01/01/" & année)) - Weekday(CDate("01/01/" & année)) + 2 getdimanche2 = DateAdd("d", 6, GetLundi2)   GetLundi3 = DateAdd("ww", Week + 2, CDate("01/01/" & année)) - Weekday(CDate("01/01/" & année)) + 2 getdimanche3 = DateAdd("d", 6, GetLundi3)   GetLundi4 = DateAdd("ww", Week + 3, CDate("01/01/" & année)) - Weekday(CDate("01/01/" & année)) + 2 getdimanche4 = DateAdd("d", 6, GetLundi4)

---