День добрый.
Есть Access с БД, в которой данные, формы, VBA.
Хочется иметь возможность скрыть окно Access'a, на время работы формы, но не разворачивать форму на весь экран.
Это можно сделать как нибудь из VBA?

Здравствуйте Victor387, Вы писали:

В модуле:

Option Compare Database
Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hwndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, _
ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Private Declare Function apiShowWindow Lib "user32" _
    Alias "ShowWindow" (ByVal hWnd As Long, _
          ByVal nCmdShow As Long) As Long
Option Explicit

Public Function hidde_on()
Dim HWND_TOPMOST, SWP_SHOWWINDOW
SetWindowPos Application.hWndAccessApp, HWND_TOPMOST, -30, -30, 0, 0, SWP_SHOWWINDOW
End Function
Public Function hidde_off()
Dim HWND_TOPMOST, SWP_NOACTIVATE, SWP_SHOWWINDOW
SetWindowPos Application.hWndAccessApp, HWND_TOPMOST, 0, 0, 1200, 1200, SWP_SHOWWINDOW
End Function

Код не мой, нашёл в архивах, прошу строго не судить.

Спасибо, ваш код работает. Но он делает не совсем то, что я хотел.
Я наверно не совсем понятно задал вопрос. Ваш код скрывает весь Access вместе с формой, а я хотел форму оставить на экране и пользователь может с ней работать, а главное окно Access'а скрыть