Live data in on sheet want to copy to another sheet if value in cell C1 changes (Which is time)

[kk9242]

Hi All,

I have a sheet in which I get Live data onto assume from A1 to G1

when ever data changes in C1 I want to copy to another sheet and keep a database sort off
Meaning when ever data changes in C1 want to copy into new row untill 65536

Also another thing I need to copy the same into word with ',' sperator for each cell and create another database.

Thanks in advance

Cheers

 

[kk9242]

Also I have this below code which copies A1 A2 to new sheet every sec but me unable to code this for A2 to g2 and make a new row entry.

Sub Datafeed1()

With Sheets("Store")
rw = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
.Range(.Cells(rw, 1), .Cells(rw, 2)).Value = Sheets("datafeed").Range("a2:g2").Value
End With
Application.OnTime Now + TimeSerial(0, 0, 3), "Datafeed1" ' run again after 3 secs
End Sub

Please help