TableTrie( MaTable, "ColNum", "ColDate" )
nNbDiff est un entier
Ind est un entier
nPos est un entier
//On commence à la 2ieme ligne
Pour Ind = 2 _A_ MaTable..Occurrence
//On test si la ligne est différente
Si colNum[Ind] = ColNum[Ind - 1] Alors
//On conserver la position du premier N° répété
Si nPos = 0 alors nPos = Ind - 1
Si colDate[Ind] <> ColDate[nPos] Alors
//Même n° - Date différente du Premier N° trouvé
Table[Ind]..CouleurFond = iRougeClair
nNbDiff ++
Fin
Sinon
//Le n° à changé on remet à 0
nPos = 0
Fin
Fin
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=18&topic_id=5670&post_id=23136