Wenn ich das Access-Fenster mit VBA ausblende
Code:
Const SW_HIDE = 0
Const SW_NORMAL = 1
Dim hWindow As Long
Dim nResult As Long
Dim nCmdShow As Long
hWindow = Application.hWndAccessApp
nCmdShow = SW_HIDE
nResult = ShowWindow(ByVal hWindow, ByVal nCmdShow)
Call ShowWindow(Me.hWnd, SW_NORMAL)
funktioniert ein Ergnis, dass Drücken auf einen Button ausgelöst wird, erst nach dem zweiten Click. Hat jemand eine ähnliche Erfahrung gemacht oder eine Lösung gefunden?