De nada, pero hay un pequeño error en el que seguramente ya habrás reparado. Donde pongo el IF, me confundí y puse un concatenador (&) en lugar del operador lógico AND. Osease que quedaría así:
If registros.BOF
AND registros.EOF Then
definitivamente, sigo siendo un aprendiz,