Excel 2013 VBA: x = userform.textbox path

[jedwardo]

Sorry wasn't sure how to label this one. I have multiple textboxes on UserFormMain. Whenever a textbox is selected I'm wanting to make x = the path of the selected textbox on UserFormMain.


For instance when this textbox is selected I'm wanting x = UserFormMain.TextBox1.Value and then show the keyboard.

Private Sub TextBox1_enter()

[COLOR=#00ff00]''    x = ?[/COLOR]

    UFKeyboard.Show
End Sub

Then this would return the data entered on the keyboard back to the textbox. This is the textbox on UFKeyboard

Private Sub TextBox1_Change()
x.Value = UFKeyboard.TextBox1.Value
End Sub

 

[jedwardo]

Figured this one out. Used this in the keyboard module:

Public tField as Variant

This on the userform textboxes:

Private Sub TextBoxA_Enter()
    tField = ActiveControl.Name
    UFKeyboard.Show
End Sub

Private Sub TextBoxB_Enter()
    tField = ActiveControl.Name
    UFKeyboard.Show
End Sub

And this in the OSK textbox:

Private Sub TextBox1_Change()
UserFormMain(tField).Value = UFKeyboard.TextBox1.Value
End Sub

On screen keyboard is now triggered when textbox is clicked and data transfers from OSK back to userform textboxes.