VBA - Открытое приложение XLS поверх MSAccess

Я создаю и форматирую книгу XLS из базы данных Access, используя VBA, инициированную нажатием кнопки пользователя на форме.

Я бы хотел, чтобы приложение XLS ВСЕГДА было открыто поверх AccessDB, чтобы позволить пользователю видеть рабочий лист напрямую. В настоящее время это прерывисто, XLS обычно открывает UNDER Access на первой итерации, а затем сверху на последующих итерациях в том же сеансе. Проверка пользователем файла необходима до окончательного сохранения и экспорта на наш клиентский портал. Обычно для каждой пользовательской сессии используется только одна итерация.

Я использую следующий подход (псевдо):

Dim appXLS As Object
Dim wbkNew As Object
Dim wks1, wks2, wks3 As Object

Set appXLS = CreateObject("Excel.Application")
Set wbkNew = appXLS.Workbooks.Add

appXLS.Visible = True
wbkNew.Activate

...populate & format 3 worksheets from Access

wks1.Activate  ' go back to sheet 1
wbkNew.SaveAs AccessMode:=xlExclusive, FileName:=myFile

Я сохраняю файл в этой процедуре, поэтому любые предупреждения о "перезаписи файла" также открываются в MSAccess.

Я думал, что линии.Activate обеспечат желаемую функцию. Есть мысли или идеи по этому поводу?

Спасибо!

0 ответов

Другие вопросы по тегам