Güncelleştirme sonrasında kodunu;

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.