ник: LxMAG
Forms![Кнопочная форма]!ExcelOLE = DLookup("Shablon", "Files", "ID = 2")
Forms![Кнопочная форма]!ExcelOLE.Action = acOLEActivate
Set xlApp = GetObject(, "Excel.Application")
Set xlWB = xlApp.Workbooks(1).Windows(1)
xlApp.WindowState = -4137
xlWB.Visible = True
...
Пример работает только при первом запуске Access. Потом окно Книги куда-то теряется, т.е. окно Excel видно, а окно листа - нет.
Хелп, плиз! 