28/01/2020, 01:19
feraz
Sub Form_Current() bu subun içine Dim ParentDocName As String ve ParentDocName = Me.Parent.Name bunu eklemişsiniz lakin neden eklediniz.
Yani kod çalışınca bunlarla hiç işi olmuyor.
Kodu alttaki gibi kısalttım
AltForm adlarınıda değiştirdim AltKtgr2 gibi.
Yani kod çalışınca bunlarla hiç işi olmuyor.
Kodu alttaki gibi kısalttım
AltForm adlarınıda değiştirdim AltKtgr2 gibi.
Sub Form_Current()
On Error GoTo hata
Me.Parent![AltKtgr2].Requery
Exit Sub
hata:
MsgBox Err.Description
End Sub
Kod:
Sub Form_Current()
On Error GoTo hata
Me.Parent![AltKtgr3].Requery
Exit Sub
hata:
MsgBox Err.Description
End Sub