I'm new to access, and I'm trying to pass a value from a combo box named BillTo on a form named CustLookUp to a text box named Phone on the form new customer2. There is a standard phone number input mask on both fields. Here's my code. It simply doesn't work. any help anyone could provide would be greatly appreciated.
Private Sub BillTo_NotInList(NewData As String, Response As Integer)
Dim stDocName As String
Dim stLinkCriteria As String
Response = acDataErrContinue
stDocName = "new customer2"
stLinkCriteria = "[Phone] = Forms![Orders]!BillTo.Text"
DoCmd.OpenForm stDocName, acNormal, , , acFormAdd, , stLinkCriteria
End Sub
Thanks for your time,
Ryan
Private Sub BillTo_NotInList(NewData As String, Response As Integer)
Dim stDocName As String
Dim stLinkCriteria As String
Response = acDataErrContinue
stDocName = "new customer2"
stLinkCriteria = "[Phone] = Forms![Orders]!BillTo.Text"
DoCmd.OpenForm stDocName, acNormal, , , acFormAdd, , stLinkCriteria
End Sub
Thanks for your time,
Ryan