Next open line

[joacro]

Hi there,

I have a userform with 4 textboxes.

The text must go into the next open row

Say textbox 1 in Row 1
textbox 2 in Row 2
textbox3 in Row 3 etc

Thanx in advance

 

[villy]

Hi there!

Let say you assign

LR = Cells(Rows.Count,"A").End(xlUp).Row
textbox1 = Range("A" & LR)
textbox2 = Range("A" & LR +1)
textbox3 = Range("A" & LR +2)

 

[joacro]

Thanx for the reply.

The code doesn't seem to work

Any other suggestions

 

[taurean]

Villy has NEARLY given you the solution. Reverse the code and it should work!

LR = Cells(Rows.Count,"A").End(xlUp).Row + 1
Range("A" & LR) = textbox1
Range("A" & LR +1) = textbox2 
Range("A" & LR +2) = textbox3

 

[joacro]

Perfect thank you.

Could you please look at my other recent post about the combo option and txtbox