rs.open 'CA ouvre le recordset if rs.eof and rs.bof then ' TEste si il y a rellement des valeur dans le rs else Do Until rs.eof ' parcours tout le recordset TonONglet.Name = rs!TonChamp ' TonONglet.Name (ou la propriete que ce soit ;)) rs.movenext ' PErmet d aller a la 'ligne' suivant du recordset loop end if rs.close
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question