Code to update links every 30 seconds

O

ordnance1

I have a Vacation Calendar which I maintain for a workgroup of about 180
people. Only a couple of people have access to the Vacation Calendar
workbook itself. I have created a slave document which has formulas linking
to each cell on the Master Document. This slave is accessible to all
employees, on 3 computers located in the work area. Each time the slave
document is opened the links are updated and the user see's the most up to
date calendar.

My problem is that I have no way to ensure that the slave document is closed
after each user has viewed it, so it could sit open for hours, and the next
user might not be viewing the most up to date calendar.

So what I am hoping is the there might be a way using code, to force the
Updating of the Values every 30 seconds.


The code can be seen below. What I do not know is how to get it to run every
30 seconds.


ActiveWorkbook.UpdateLink Name:= _
"\\Pats-PC\Vacation\Dispatch\Paratransit\Vacation\New
Vacation.xlsm", Type:= _
xlExcelLinks
 
A

AB

check out:
Application.OnTime MyTimehere, MySubHere

Can google for Chip Pearsons site - he's got brilliant adivses/samples
on everything including ontime.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top