Teşekkürler Seruz, güzel kod..
İnadına, ille de Accesstr.net...
(20/08/2009, 14:33)Seruz yazdı: O an açık olan form haricinde kapatılmasını istiyorsak bunu kullanabilirsiniz.
Kod:Dim TumFormlar As Object
For Each TumFormlar In Application.CurrentProject.AllForms
If Me.Form.Name <> TumFormlar.Name Then 'Aktif olan formu kapatmasın.
DoCmd.Close acForm, TumFormlar.Name, acSaveNo
End If
Next
(20/08/2009, 14:33)Seruz yazdı: O an açık olan form haricinde kapatılmasını istiyorsak bunu kullanabilirsiniz.
Kod:Dim TumFormlar As Object
For Each TumFormlar In Application.CurrentProject.AllForms
If Me.Form.Name <> TumFormlar.Name Then 'Aktif olan formu kapatmasın.
DoCmd.Close acForm, TumFormlar.Name, acSaveNo
End If
Next