Auto update or refresh workbook in every 15 seconds

Hi All,

I have a workbook, which has some external web links to auto update the current time of different cities. The workbook automatically refreshes in every 1 minute, but I made below codes for auto refreshing the workbook in every 15 seconds.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

I see that it works fine, but I'm unable to stop it at any moment at the time of closing the workbook, and I am shocked when the workbook automatically opens just after the closing whether I save the data or not. :O

How can I do the auto updating activity of web links to a single worksheet instead of the whole workbook? I'm unable to work anywhere in this workbook due to it gets busy/ stuck while updating or refreshing.

How can I show/add a message in a cell: -

The workbook/ worksheet will be refreshed in 10 seconds
The workbook/ worksheet will be refreshed in 9 seconds
... ... ... ... ... ... ... ... ... ... ... ... ... ... ...
... ... ... ... ... ... ... ... ... ... ... ... ... ... ...
The workbook/ worksheet will be refreshed in 1 second

Please find the attached workbook and try to help me for the right solution.
Thanks in advance!

MS Excel version: 2007

Hi SunOffice
Yeah, this is a bit scary isn't it

I am shocked when the workbook automatically opens just after the closing whether I save the data or not.

You need a Workbook BeforeClose Event to turn the timer off. Google on "stop timer on workbook close vba" and you'll find many references to this issue. If you can't get it resolved, let me know.

I googled and tried with some below codes, but nothing is working fine for me.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

I found StopTimer2 code from : http://www.excelforum.com/excel-prog...r-closing.html

Please see the above attached workbook and help me out....

Hi SunOffice
This code works for me:

In your ThisWorkbook Module

Please Login or Register  to view this content.

In a General Module

Please Login or Register  to view this content.

Do you have a macro called

"Refresh.Time"

The code references "RefreshTime"

It's working fine now!!

so you mean that here two macro codes will call each other for continuous refreshing the workbook in every 15 seconds of interval.

Thanks a lot Mr jaslake!

Hi SunOffice
The code I've provided is what I use. Yes

so you mean that here two macro codes will call each other for continuous refreshing the workbook in every 15 seconds of interval

as long as you've not closed the workbook, the Timer will run. When you close the workbook, the Timer is turned off.

If that satisfies your need, please mark your thread as "Solved".

To mark your thread solved do the following:
- Go to your first post on the thread
- Click edit
- Click Advance
- Just below the word "Title:" you will see a dropdown with the word No prefix.
- Change to Solved
- Click Save

Mr. jaslake,

Got It! Thanks a world for ur wonderful support & idea!!