Option Compare Database Public Function count_chevalier() count_chevalier = DCount("id", "Chevaliers", "") End Function