automatically copy data to other cells every 5 minutes, multi sheets

ste33uka

Active Member
Joined
Jan 31, 2020
Messages
316
Office Version
  1. 2019
Platform
  1. Windows
Hi i would like to copy data from cell A1 to B column automatically every 5 minutes but with multi sheets.
The code i have so far works, but it will only copy cell A1 to cell B1 if i am on the current sheet.
Is it possible to have it copy for all sheets.

I have this in "this workbook"

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Stop execution when workbook closes
On Error Resume Next
Application.OnTime Heure, "Calcul", , False
End Sub
Private Sub Workbook_Open()
'start execution when workbook opens
Application.OnTime Now + TimeValue("00:05:00"), "Calcul"
End Sub


And this in module 1

Sub Calcul()
Heure = Now + TimeValue("00:05:00")
Application.OnTime Heure, "Calcul"
Range("b19666").End(xlUp).Offset(1) = [a1]
End Sub
 

Some videos you may like

Excel Facts

Who is Mr Spreadsheet?
Author John Walkenbach was Mr Spreadsheet until his retirement in June 2019.

Joe4

MrExcel MVP, Junior Admin
Joined
Aug 1, 2002
Messages
55,470
Office Version
  1. 365
Platform
  1. Windows
While we do allow Cross-Posting on this site, we do ask that you please mention you are doing so and provide links in each of the threads pointing to the other thread (see rule 13 here along with the explanation: Forum Rules). This way, other members can see what has already been done in regards to a question, and do not waste time working on a question that may already be answered.

Thank you.
 

Watch MrExcel Video

Forum statistics

Threads
1,118,974
Messages
5,575,305
Members
412,654
Latest member
dibison18
Top