29-07-2014, 19:06
Fatura formu kapalıysa açmasını, açıksa ama altta kalmışsa öne getirmesini istiyorum.
Öne getirmek için DoCmd.OpenForm kullanmak istemiyorum çünkü form tabloya direkt bağlı değil, bu şekilde açık formu tekrar açınca forma yeni verileri getiriyor.
Dolayısıyla açık olan fakat başka formların altında kaldığı için görünmeyen formu öne getirecek koda ihtiyacım var.
If SysCmd(acSysCmdGetObjectState, acForm, "Fatura") <> 0 Then
MsgBox "Form Açık"
'Açık formu öne getirecek kod
Else
MsgBox "Form Kapalı"
DoCmd.OpenForm "Fatura", acNormal, , , acFormReadOnly
End If
Öne getirmek için DoCmd.OpenForm kullanmak istemiyorum çünkü form tabloya direkt bağlı değil, bu şekilde açık formu tekrar açınca forma yeni verileri getiriyor.
Dolayısıyla açık olan fakat başka formların altında kaldığı için görünmeyen formu öne getirecek koda ihtiyacım var.
If SysCmd(acSysCmdGetObjectState, acForm, "Fatura") <> 0 Then
MsgBox "Form Açık"
'Açık formu öne getirecek kod
Else
MsgBox "Form Kapalı"
DoCmd.OpenForm "Fatura", acNormal, , , acFormReadOnly
End If