Could you help me fix the Error message:
Compile Error Ambiguous name detected: varTitle
Code:
Private Sub Save_Click()
Me.lngEmpID.Value = lngMyEmpID
MsgBox ("Saved"), , "Saved Contact"
varTitle = Forms!NewContact!Title
Call CallFunction
If MsgBox("Do you want to create new contact ?", vbYesNo, "Do you want to create new contact ?") = vbYes Then
DoCmd.Close acForm, Me.Name
DoCmd.OpenForm "NewContact"
Else
DoCmd.Close acForm, Me.Name
DoCmd.OpenForm "S"
End If
'DoCmd.Close acForm, Me.Name
'DoCmd.OpenForm "S"
End Sub