Private Sub giden_hambezmt_AfterUpdate()
Select Case (Me.giden_geldigiyer)
Case "depo"
Forms![t_hambezgönderilen]![t_musteriler alt formu1].Form![gelenmt] = Me.giden_hambezmt
Case Else
Forms![t_hambezgönderilen]![t_musteriler alt formu1].Form![gidenmt] = Me.giden_hambezmt
End Select
End Sub
olarak değiştirin ve deneyin.
Güncelleştirme sonrasında kodunu;