(16/06/2015, 23:13)ozanakkaya yazdı: İnceleyiniz..

Merhaba, verdiğiniz cevap mükemmel oldu. problemi çözdü. Teşekkür ederim.

Fakat FormAA nın sağ üst köşesinde yer alan simge durumuna küçültmeye tıklayınca aynı işlemi yani masa üstünü göstersin şeklinde yapmak istedim olmadı bunu nasıl yapabilirim. Ben şunu denedim:
 
Private Sub Form_Minimize()
Dim Application As Object
Set Application = CreateObject("Shell.Application")
Application.MinimizeAll
Me.Modal = False
Me.Modal = True
DoCmd.Maximize
End Sub