Transferring Text from userform textbox to a worksheet textbox

[Mikeymike_W]

Hi there,

I'm wanting to copy text from a userform textbox into a workseet textbox i.e. a non activex textbox, just a standard textbox (Activex textboxes are easier but i find that they tend to lag on a worksheet).

So the sheet is called "Life Purpose" and the textbox is named "TBSR1", can anyone help me with the code for this? It will be placed within a command button on the userform.

I appreciate any help you can give me for this.

Mike

 

[Norie]

Mike

This will put the text from Textbox1 on a userform into the textbox TBSR1 on the sheet 'Life Purpose'.

Private Sub CommandButton1_Click()
    Sheets("Life Purpose").Shapes("TBSR1").OLEFormat.Object.Text = Me.TextBox1.Value
End Sub

 

[Mikeymike_W]

Norie, it works a charm thanks you so much!