Textbox data to cell
 

My userform has a TextBox for First Name , Last Name and Employee #. What I
need to know is, how can I put the contents of all 3 Textboxes into one cell?

Example:

Last Name, First Name - Employee #

Textbox data to cell
 

hi
this should do it. adjust ranges to suit.
Range("C5").Value = _
Me.TextBox2.Value & ", " & Me.TextBox1.Value & " - " & Me.TextBox3.Value

regards
FSt1

"Dave Peterson" wrote:

Dim SomeCell as range

Set somecell = activesheet.range("a1")
somecell.value _
= me.textbox2.value & ", " & me.textbox1.value & " - " & me.textbox3.value



Pats wrote:

My userform has a TextBox for First Name , Last Name and Employee #. What I
need to know is, how can I put the contents of all 3 Textboxes into one cell?

Example:

Last Name, First Name - Employee #

--

Dave Peterson

Textbox data to cell
 

Assuming the text boxes are numbered in the same order that you listed them,
you could:

Private Sub UserForm_Click()
ActiveSheet.Range("A1") = Me.TextBox2,Value & "," & _
Me.TextBox1.Value & "-" & Me.TextBox3.Value
End Sub

But I would seriously consider putting the employee number in a separate
column for sorting, searching, etc. at a later date if needed.



"Pats" wrote in message
...
My userform has a TextBox for First Name , Last Name and Employee #. What
I
need to know is, how can I put the contents of all 3 Textboxes into one
cell?

Example:

Last Name, First Name - Employee #

Textbox data to cell
 

I don't understand the difference.

Do you not like variables or do you not like qualifying the ranges?

FSt1 wrote:

hi
this should do it. adjust ranges to suit.
Range("C5").Value = _
Me.TextBox2.Value & ", " & Me.TextBox1.Value & " - " & Me.TextBox3.Value

regards
FSt1

"Dave Peterson" wrote:

Dim SomeCell as range

Set somecell = activesheet.range("a1")
somecell.value _
= me.textbox2.value & ", " & me.textbox1.value & " - " & me.textbox3.value



Pats wrote:

My userform has a TextBox for First Name , Last Name and Employee #. What I
need to know is, how can I put the contents of all 3 Textboxes into one cell?

Example:

Last Name, First Name - Employee #

--

Dave Peterson


--

Dave Peterson

Textbox data to cell
 

hi
opps. posted under the wrong post.
i read the op's request. i have a play form where i test stuff before
posting. when i came back, you had already posted with almost the same thing
i had. i had already did the work so i thought i would just toss in my 2
cents any way. but posted under your post instead of the op's. sorry. my bad.

Regards
FSt1

"Dave Peterson" wrote:

I don't understand the difference.

Do you not like variables or do you not like qualifying the ranges?

FSt1 wrote:

hi
this should do it. adjust ranges to suit.
Range("C5").Value = _
Me.TextBox2.Value & ", " & Me.TextBox1.Value & " - " & Me.TextBox3.Value

regards
FSt1

"Dave Peterson" wrote:

Dim SomeCell as range

Set somecell = activesheet.range("a1")
somecell.value _
= me.textbox2.value & ", " & me.textbox1.value & " - " & me.textbox3.value



Pats wrote:

My userform has a TextBox for First Name , Last Name and Employee #. What I
need to know is, how can I put the contents of all 3 Textboxes into one cell?

Example:

Last Name, First Name - Employee #

--

Dave Peterson


--

Dave Peterson

Textbox data to cell
 

Ah.

No problem. I am no longer confused--well, about that <vbg.

FSt1 wrote:

hi
opps. posted under the wrong post.
i read the op's request. i have a play form where i test stuff before
posting. when i came back, you had already posted with almost the same thing
i had. i had already did the work so i thought i would just toss in my 2
cents any way. but posted under your post instead of the op's. sorry. my bad.

Regards
FSt1

"Dave Peterson" wrote:

I don't understand the difference.

Do you not like variables or do you not like qualifying the ranges?

FSt1 wrote:

hi
this should do it. adjust ranges to suit.
Range("C5").Value = _
Me.TextBox2.Value & ", " & Me.TextBox1.Value & " - " & Me.TextBox3.Value

regards
FSt1

"Dave Peterson" wrote:

Dim SomeCell as range

Set somecell = activesheet.range("a1")
somecell.value _
= me.textbox2.value & ", " & me.textbox1.value & " - " & me.textbox3.value



Pats wrote:

My userform has a TextBox for First Name , Last Name and Employee #. What I
need to know is, how can I put the contents of all 3 Textboxes into one cell?

Example:

Last Name, First Name - Employee #

--

Dave Peterson


--

Dave Peterson


--

Dave Peterson