ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Updating a shared workbook every 30 secs? (https://www.excelbanter.com/excel-discussion-misc-queries/189952-updating-shared-workbook-every-30-secs.html)

Ricoy-Chicago

Updating a shared workbook every 30 secs?
 
Using Excel XP. I am creating a shared workbook, no problem here. However,
the update option in the [Advanced] tab can be set to nothing less than 5
minutes. Is there a way to automatically update every 30 secs or so? or, Is
there some VBA coding I could use to remind the user to save the changes
after they update the workbook?

Thank for any help.

Kevin B

Updating a shared workbook every 30 secs?
 
If you press Alt+F11 and then double click on the ThisWorkbook icon in the
Project window on the left. In the code pane to the right, change the first
combo box at the top to Workbook and the combo box to the right to
SheetChange and enter the following code:

ThisWorkbook.Save

The code should look like the lines below.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

ThisWorkbook.Save

End Sub

This save the workbook with each change on any sheet.

However, if this is large workbook it could prove to be too time consuming.
--
Kevin Backmann


"Ricoy-Chicago" wrote:

Using Excel XP. I am creating a shared workbook, no problem here. However,
the update option in the [Advanced] tab can be set to nothing less than 5
minutes. Is there a way to automatically update every 30 secs or so? or, Is
there some VBA coding I could use to remind the user to save the changes
after they update the workbook?

Thank for any help.


Ricoy-Chicago

Updating a shared workbook every 30 secs?
 
I'll try it... it is a very small workbook... under 50K

Thank you

"Kevin B" wrote:

If you press Alt+F11 and then double click on the ThisWorkbook icon in the
Project window on the left. In the code pane to the right, change the first
combo box at the top to Workbook and the combo box to the right to
SheetChange and enter the following code:

ThisWorkbook.Save

The code should look like the lines below.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

ThisWorkbook.Save

End Sub

This save the workbook with each change on any sheet.

However, if this is large workbook it could prove to be too time consuming.
--
Kevin Backmann


"Ricoy-Chicago" wrote:

Using Excel XP. I am creating a shared workbook, no problem here. However,
the update option in the [Advanced] tab can be set to nothing less than 5
minutes. Is there a way to automatically update every 30 secs or so? or, Is
there some VBA coding I could use to remind the user to save the changes
after they update the workbook?

Thank for any help.



All times are GMT +1. The time now is 11:40 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com