Доброго времени дня, коллеги!
Решил тут намедни приукрасить программку следующим образом: на листе есть большая таблица-отчет с формулами. на другом листе вносятся данные, которые отражаются на листе-отчете. Т.к. отчет большой (много формул), то добавлении записи на втором листе занимает некоторое время (понятно что из-за пересчета формул). Я отключил автовычисление формул и включаю его только когда, активируется лист с таблицей-отчетом. Захотелось мне, чтобы при активации листа-отчета появлялась форма с flash-анимацией типа "loading..." и была видна пока происходит пересчет формул. С этим проблем не возникло: Закинул на форму ShockwaveFlash, прописал там все что нужно (в режиме edit-a эта анимация крутится - проблем нет). Далее макрос на активацию листа:
И тут происходит затык: не работает анимация Причем если показать форму модально, то все работает нормально. Никто не сталкивался с такой проблемой? Можно ее как-нибудь решить?
Решил тут намедни приукрасить программку следующим образом: на листе есть большая таблица-отчет с формулами. на другом листе вносятся данные, которые отражаются на листе-отчете. Т.к. отчет большой (много формул), то добавлении записи на втором листе занимает некоторое время (понятно что из-за пересчета формул). Я отключил автовычисление формул и включаю его только когда, активируется лист с таблицей-отчетом. Захотелось мне, чтобы при активации листа-отчета появлялась форма с flash-анимацией типа "loading..." и была видна пока происходит пересчет формул. С этим проблем не возникло: Закинул на форму ShockwaveFlash, прописал там все что нужно (в режиме edit-a эта анимация крутится - проблем нет). Далее макрос на активацию листа:
Код |
---|
Private Sub Worksheet_Activate() fmWait.Show False DoEvents Application.CalculateFull Unload fmWait End Sub |
И тут происходит затык: не работает анимация Причем если показать форму модально, то все работает нормально. Никто не сталкивался с такой проблемой? Можно ее как-нибудь решить?
Учимся сами и помогаем другим...