ник: snipe
А зачем этот огород?
при чем тут 60000?
следите за мыслью
1. Dim переменная as Long
2. Динамически меняем строку SQL(на нужную) в сохраненном ранее запросе (можно не делать если все запросы сохранены)
3. Обновляем (DoCmd.Requery)
4. Экспортируем запрос в Ексель
5. переменная=количество строк в запросе
6. Получаем доступ к Екселю
7. Подцепляемся к нужному файлу
8. И вот цикл For i=2 to переменная+1 (+1 потому-что в первой строке у вас заголовки столбцов)
ну и т.д