Merhabalar,
Programın ilk açılışında dizayn modunu engellemeyi ve kullanıcının access tasarım modunu görmesini aşağıdaki kod bloğu ile engelliyorum. Fakat form içerisindeki bir buton ile iletişim görünüm modunda bir rapor açtığımda da aşağıdaki kod bloğu bu rapor ekranının görünmesini engelliyor. Ne yapabilirim?

Function fSetAccessWindow(nCmdShow As Long)
Dim loX As Long
Dim loForm As Form
On Error Resume Next
Set loForm = Screen.ActiveForm
If Err <> 0 Then
If nCmdShow = SW_HIDE Then
loX = apiShowWindow(hWndAccessApp, nCmdShow)
Err.Clear
End If
Else
loX = apiShowWindow(hWndAccessApp, nCmdShow)
End If
fSetAccessWindow = (loX <> 0)
End Function

Raporu diger ozelliklerinden Kalici-uste ayarlarini evet yapin, rapor acilma olay yordamina docmd.maximize yazma ve raporun acilma seklini baski on izleme ile sonuc alinabilir.

çok teşekkürler dsezgin. istediğim gibi oldu, sadece maximize olduktan sonra pencereyi boyutlandırılamıyordu, bunu da iletişim modunda değilde Normal modda açınca oldu, sanırım başka bir yeri etkilemez. Tekrar teşekkürler.