insert multiple text box into one single cell

Hi all,

My coding used:

Worksheets("PreOrder Details").Activate
NextRow = Application.WorksheetFunction.CountA(Range("A:A")) + 1
Cells(NextRow, 1) = CustomerName.Text
Cells(NextRow, 2) = Order1.Text

My problem is that i have many orders from this one customer under one userform.
I have Order1, Order2, Order3, Order4 etc. My coding is directing Order1 to one cell. I want to direct the text in Order1 Order2 Order3 into a single cell.

I have tried Cells(NextRow, 2) = Order1.Text And Order2.Text
But they said error. Lol.
Please help, Im new to this.

Thanks Much

Hello,Welcome....I am not sure why you want to assign to one cell .. if you do like that It will just over write the previous values...
and last executed code will be your current value... but it makes no sense...

anyway.. you need to multiply your statement... to do assign....

Please Login or Register  to view this content.

if you can post your full code and your desired result... it will be easy to help you accurately...

item order.png

I want to do this because there will be many purchase from one customer and i want to see all the orders from one customer under the items purchased cell.
I tried using your code but yeah, it overwrites.

but your logic is wrong to approach your result... would you mind posting your Excel Data and write down few steps how you want your output should be.....

Click on Go advanced to attach a file....