Runtime error 2115

[Sam Summers]

Hi Guys,

I have been trying to figure this out and then referred to a few threads on various websites regarding the above.

But most too complicated for my simple problem?

All I want to do is set a Textboxes text to the value from a combobox on the same form after update?

Here is what I have tried:

---------------------------------------------------------------

Private Sub ClientName_AfterUpdate()
Dim Client As String
Client = Me.ClientName.Value

Me.SetClient.SetFocus
Me.SetClient.Text = Client

End Sub

--------------------------------------------------------------

And before that, this:

--------------------------------------------------------------

Private Sub ClientName_AfterUpdate()

Me.SetClient.SetFocus
Me.SetClient.Text = Me.ClientName.Value

End Sub

---------------------------------------------------------------

Same error for both?

Again, I must be missing something?

Thank you in advance

 

[CJ_London]

not sure why you want to update another field with the same value but all you need is

 Private Sub ClientName_AfterUpdate()

  
     SetClient = ClientName
     SetClient.SetFocus

End Sub

 

[arnelgp]

same as mr. cj:

use .Value instead of .Text

 

[Sam Summers]

Maybe I am trying to go around it a long way but all I am trying to do is, depending on the client, all the forms (input, edits and views) and all the reports change to the clients requirements. So I am using the textbox to reference.

Thank you again guys!