Hello all again
I have some vba code below and I hope you can help, I want to add an error trap so if there is an error it deletes the current record and closes the window(Form) along with a messagebox.
Below is my code:
Private Sub Empselectsicklog_BeforeUpdate(Cancel As Integer)
Me.txtOracle.Value = Me.Empselectsicklog.Column(2)
Me.txtEmployeeName.Value = Me.Empselectsicklog.Column(1)
Me.txtAccount.Value = Me.Empselectsicklog.Column(3)
Me.txtFTPT.Value = Me.Empselectsicklog.Column(4)
Me.txtHours.Value = Me.Empselectsicklog.Column(5)
Me.txtManager.Value = Me.Empselectsicklog.Column(6)
Me.txtRegion.Value = Me.Empselectsicklog.Column(7)
End Sub
Thank you
I have some vba code below and I hope you can help, I want to add an error trap so if there is an error it deletes the current record and closes the window(Form) along with a messagebox.
Below is my code:
Private Sub Empselectsicklog_BeforeUpdate(Cancel As Integer)
Me.txtOracle.Value = Me.Empselectsicklog.Column(2)
Me.txtEmployeeName.Value = Me.Empselectsicklog.Column(1)
Me.txtAccount.Value = Me.Empselectsicklog.Column(3)
Me.txtFTPT.Value = Me.Empselectsicklog.Column(4)
Me.txtHours.Value = Me.Empselectsicklog.Column(5)
Me.txtManager.Value = Me.Empselectsicklog.Column(6)
Me.txtRegion.Value = Me.Empselectsicklog.Column(7)
End Sub
Thank you