Add more data to existing cell

[perko121]

Hi all,

I have sheet 1 and sheet 2, using a trigger button I'm trying to add cell data from 1st sheet cell to 2nd sheet cell and I'm using this formula:

Sheets("sheet2").Range("A1") = Sheets("sheet1").Range("A1")

what do I need to change in code to remain the data from A1 cell in sheet2 and add data from A1 cell from sheet2

example

sheet1 A1 = google
sheet2 A1 = yahoo

result=
sheet2 A1 = google yahoo

thank you

[walruseggman]

With Sheets("Sheet2").Range("A1")
.Value = .Value & " " & Sheets("Sheet1").Range("A1").Value
End With

[Raphaelp]

--------------------------

Deleted