Access - Se requiere un objeto

Se quiere correr un lazo Do pero me señala que se requiere un objeto; el lazo Do trabaja con dos objetos (tablas) TOLERANCIARTO y DIARTO, pero las dos ya están referenciadas, ¿me podrían ayudar?

Normalmente la línea en la que se genera el error queda resaltada, en la imagen que se muestra no se ve mas que el mensaje del sistema y por su ambigüedad (por si mismo) no aporta información.

Si me llama la atención el método empleado para acceder a la información y la forma de obtener el canal, Access tiene una función que devuelve un canal libre (lo que evita reutilizar uno que pueda estar 'en uso' y posible causa del error).

De cualquier forma los datos aportados no permiten emitir un juicio de valor.

La línea donde se genera el error es en DO Until lo resalta en amarillo, solamente que en la captura de pantalla no se aprecia; me interesa lo de el canal libre mencionado, me podría ampliar la información, muchas gracias.

Ojea la función FreeFile.