VB: copy data to a new cell in a range every day.

[tweek]

Hi!

Can you help me with this one?

I´m retrieving data to sheet1 from from web daily, and I´m interested in one number that changes daily in cell E53 in sheet1.

So what I need to do is save that number to a range (B:B) in sheet2. Like if todays data is copied to cell B5, tomorrows data will be copied to cell B6 and so on...

Is this possible? Thank you for your time and help.

Tweek

 

[VoG]

Try

Sub SaveE53()
Dim NR As Long
With Sheets("Sheet2")
    NR = .Range("B" & Rows.Count).End(xlUp).Row + 1
    .Range("B" & NR).Value = Sheets("Sheet1").Range("E53").Value
End With
End Sub

 

[tweek]

Problem solved! Thank you, that works perfect for me.

Have a great day!