Paste value into txt box from worksheet

[ipbr21054]

Evening,

I would like to put a code to a button to do the following,

Copy the cell value of E17
Open user form called Hondaparts
Paste the copied value into txt box called MyPartNumber
Then enter

The code i have so far is shown below but cant figure out the paste part,

Sub Macro9()'
' Macro9 Macro
'


'
    Range("E17").Select
    Selection.Copy
    HondaParts.Show
    MyPartNumber.Paste
End Sub

With this code i get the cell copied ^ user form open but then im stumped.
Can you please advise.

 

[Fluff]

How about

Sub Macro9() '
    HondaParts.Show
    HondaParts.MyPartNumber.Value = Range("E17").Value
End Sub

 

[My Aswer Is This]

Try this:

Sub Macro9()
'Modified  7/12/2018  4:38:13 PM  EDT
HondaParts.MyPartNumber.Value = Range("E17").Value
HondaParts.Show
End Sub

 

[ipbr21054]

Many thanks.
This did the trick,

Sub Macro9()

HondaParts.MyPartNumber.Value = Range("E17").Value
HondaParts.Show

End Sub

On a side note that im thinking about.
I have a code which when i select a cell the row is changed to blue & the selected cell is changed to green.
I assume the green cell is the active cell ?

If so as opposed to the value in cell E17 mentioned above can we have the code run but the value in question to use would be the green selected cell ?

Just an after thought after my original post,of which im good at,Sorry.

Fluff when i tried your code it would not paste but thanks for your time.

 

[My Aswer Is This]

You said:

I have a code which when i select a cell the row is changed to blue & the selected cell is changed to green.​

I would need to see this code:

 

[My Aswer Is This]

Try this:

Sub Macro9()
'Modified  7/12/2018  5:01:43 PM  EDT
HondaParts.MyPartNumber.Value = ActiveCell.Value
HondaParts.Show
End Sub

 

[ipbr21054]

Ha Ha,
You beat me to it.

Many thanks

 

[My Aswer Is This]

Ha Ha,
You beat me to it.

Many thanks

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.