capture live data at a specified time


I will have many cols whose cells are being constantly updated live.

I would like to be able to freeze/capture the data in the various cols at specified times.

ie ... col F at 13:00, col G at 13:10 etc ..

I would be grateful if anyone can help with that.





Selected Answer

Try this:

Private Sub Workbook_Open()

'Runs a macro at 4:30 PM
Application.OnTime TimeValue("16:30:00"), "StoreData"

End Sub

Sub StoreData()

NextRow = Range("A" & Rows.Count).End(xlUp).Offset(1).Row

Sheets("Name of Destination Sheet").Cells(1,NextRow ).Value = Sheets("Name of Source Data Sheet").Range("A1").Value

End Sub

This will take data from the data sheet and put it on the destination sheet. 

If currently works to get data from A1 on the data sheet and put it on the next empty row in column A on the destination sheet.

I haven't been able to test this macro so try it on sample data first and expand it to get all necessary data.

Here are the tutorials from this site that you can use to create a macro like this or edit it further:

Automatically Run a Macro at a Certain Time

Find the Next Blank Row with VBA Macros in Excel

Get Data from the Worksheet into a Macro in Excel

Put Data into a Worksheet using a Macro in Excel



thanks very much ... & happy new year ..
Sherman51 (rep: 6) Dec 31, '17 at 1:32 pm
Add to Discussion

Answer the Question

You must create an account to use the forum. Create an Account or Login