ник: Stanislav
Смотри пример.
Порядок таков:
Создаем и сохраняем в объектах запрос вида:
SELECT First(TABL.pokk6) AS FirstOfpokk6
FROM TABL
Назовем этот запрос, например, MySelectFirstQuery
Потом в код нажатия кнопки Кнопка0
добавляем строку:
Me.Поле10 = DFirst("FirstOfpokk6", "MySelectFirstQuery")
Если надо также добавляем эту строку в событие формы OnActivate. Или любое другое событие - какое - реши сам.
Что при этом происходит:
После нажатия Кнопка0 выполняется твой код, который что-то делает с эксельными листами (в подробности я не вникал, вопрос вроде как не об этом).
В конце кода выполняется строка:
Me.Поле10 = DFirst("FirstOfpokk6", "MySelectFirstQuery")
DFirst - извлекает любое случайное значение поля FirstOfpokk6 из сохраненного запроса MySelectFirstQuery. Но оно там одно, так что ошибиться невозможно.
Запустить это дело я так и смог :) потому что по нажатию кнопки твой код спрашивает таблицы, я указываю ему на 99955.55 и ничего. По-моему, тебе надо там еще поработать.