Private Sub CommandButton1_Click()

Sheets("Sheet2").Select
ActiveCell.Resize(1,10) = "=Sheet1!A1 & "" "" & Sheet1!A2"

End Sub

You would need a more complex formula if you want to go down the column on
sheet2 and each cell would reference two cells down in sheet1.

Regards,
Tom Ogilvy



<billabong wrote in message
...

How would you place this in vb editor with a space

Have tried putting & " " & in between but did not work
here is my code:

Private Sub CommandButton1_Click()

Sheets("Sheet2").Select
ActiveCell = "=Sheet1!A1 & Sheet1!A2"

End Sub

I will be using a for loop to bring data from one sheet to the other
as the user inputs. How would I include iteration variable "i" in
Sheet1!A1


Thanks for your answers


On Fri, 11 Jul 2003 19:36:16 -0600, "J.E. McGimpsey"
wrote:

You could concatenate them by putting this in Sheet2!A1:

=Sheet1!A1 & Sheet1!A2

In article ,
billabong < wrote:

Hello

I have data in a1 and a2 of sheet 1
how would you pass that data to a single cell in sheet 2 a1

Thanks