Copy Paste data after specific Time Interval

Hi Friends

I need one vba macro to copy paste data after specific time interval.....say in H1 cell has time 7:00:00 (or time between 7:00:00 to 7:01:00) then just copy data to cell D3:D5 from Cell J1:J3. attached excel workbook for reference.

see below snapshot for further information.

Capture.PNG

Thanks in advance
Enroll

Hi,
You could use Application.OnTime.
After button will be pressed application will take time from cell H1 and run CopyValues sub in this time.

Sub Button1_Click()

Application.OnTime Sheets("Sheet1").Range("H1"), "CopyValues"

End Sub


Sub CopyValues()

Sheets("Sheet1").Range("D3:D5").Copy Sheets("Sheet1").Range("J1")

End Sub

Hi Kasan,

Thanks for your help, however it's not working...i just need copy data from J1:J3 to
Say if H1 having time 7:00:00AM then paste data in D3:D5
Say if H1 having time 9:00:00AM then paste data in D11:D13

It would be very helpful if you do automatic process without any interpretation.

Thanks in advance

Hi,
Slightly changed code. Now values from range J1:J3 will be copied to column D to the right from according time.
Make sure that time in H1 is in column B, if not - you will see message box and nothing will happen.

Sub Button1_Click()

If IsError(Application.Match(Sheets("Sheet1").Range("H1"), Sheets("Sheet1").Range("B:B"), 0)) Then
    MsgBox "No time found in table"
    Exit Sub
End If

Application.OnTime Sheets("Sheet1").Range("H1"), "CopyValues"

End Sub


Sub CopyValues()

Sheets("Sheet1").Range("J1:J3").Copy Sheets("Sheet1").Range("D" & Application.Match(Sheets("Sheet1").Range("H1"), Sheets("Sheet1").Range("B:B"), 0))

End Sub

Hi Kasan

Amazing....perfectly working. Can we run above code by every 15 minutes.

Thank you so much

Reputation added.

You can run this code every 15 minutes. What values will be changed for each run? will you change time in H1 for every run?
Describe your idea more in detail and step-by-step and we will figure out something.

Thanks Kasan for your valuable inputs.
Further to this discussion i would like if you can add some code for timer or something like that to copy data from one sheet to another to use in chart.
For Example if we download data from certain stock broking website where price is changing frequently.Can we we copy this scrap data to another file on every five minute?