Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
I'd like our shared team spreadsheet to issue a little audio alert each time
someone saves the spreadsheet (thereby updating all users). Can this be done? |
#2
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Try something like the following code in the ThisWorkbook code module. It
must go in the ThisWorkbook module, not a regular code module. Change "Chimes" to the name of the sound you want to play. Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" ( _ ByVal lpszSoundName As String, _ ByVal uFlags As Long) As Long Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) sndPlaySound "Chimes", 0 End Sub -- Cordially, Chip Pearson Microsoft Most Valuable Professional Excel Product Group Pearson Software Consulting, LLC www.cpearson.com (email on web site) "Bob W" wrote in message ... I'd like our shared team spreadsheet to issue a little audio alert each time someone saves the spreadsheet (thereby updating all users). Can this be done? |
#3
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Is that going to trigger a macro warning every time anybody opens the shared
workbook? That won't fly...people will just bypass the macro (if excel is like Word). "Chip Pearson" wrote: Try something like the following code in the ThisWorkbook code module. It must go in the ThisWorkbook module, not a regular code module. Change "Chimes" to the name of the sound you want to play. Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" ( _ ByVal lpszSoundName As String, _ ByVal uFlags As Long) As Long Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) sndPlaySound "Chimes", 0 End Sub -- Cordially, Chip Pearson Microsoft Most Valuable Professional Excel Product Group Pearson Software Consulting, LLC www.cpearson.com (email on web site) "Bob W" wrote in message ... I'd like our shared team spreadsheet to issue a little audio alert each time someone saves the spreadsheet (thereby updating all users). Can this be done? |
#4
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
If the user doesn't enable macros (or opens the workbook file while holding
the SHIFT key), the code won't run. Unfortunately, there is no other way to do it. -- Cordially, Chip Pearson Microsoft Most Valuable Professional Excel Product Group Pearson Software Consulting, LLC www.cpearson.com (email on web site) "Bob W" wrote in message ... Is that going to trigger a macro warning every time anybody opens the shared workbook? That won't fly...people will just bypass the macro (if excel is like Word). "Chip Pearson" wrote: Try something like the following code in the ThisWorkbook code module. It must go in the ThisWorkbook module, not a regular code module. Change "Chimes" to the name of the sound you want to play. Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" ( _ ByVal lpszSoundName As String, _ ByVal uFlags As Long) As Long Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) sndPlaySound "Chimes", 0 End Sub -- Cordially, Chip Pearson Microsoft Most Valuable Professional Excel Product Group Pearson Software Consulting, LLC www.cpearson.com (email on web site) "Bob W" wrote in message ... I'd like our shared team spreadsheet to issue a little audio alert each time someone saves the spreadsheet (thereby updating all users). Can this be done? |
#5
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Chip, thanks for the macro; i guess we will have to get our team together and
tell them to enable macros.... "Chip Pearson" wrote: If the user doesn't enable macros (or opens the workbook file while holding the SHIFT key), the code won't run. Unfortunately, there is no other way to do it. -- Cordially, Chip Pearson Microsoft Most Valuable Professional Excel Product Group Pearson Software Consulting, LLC www.cpearson.com (email on web site) "Bob W" wrote in message ... Is that going to trigger a macro warning every time anybody opens the shared workbook? That won't fly...people will just bypass the macro (if excel is like Word). "Chip Pearson" wrote: Try something like the following code in the ThisWorkbook code module. It must go in the ThisWorkbook module, not a regular code module. Change "Chimes" to the name of the sound you want to play. Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" ( _ ByVal lpszSoundName As String, _ ByVal uFlags As Long) As Long Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) sndPlaySound "Chimes", 0 End Sub -- Cordially, Chip Pearson Microsoft Most Valuable Professional Excel Product Group Pearson Software Consulting, LLC www.cpearson.com (email on web site) "Bob W" wrote in message ... I'd like our shared team spreadsheet to issue a little audio alert each time someone saves the spreadsheet (thereby updating all users). Can this be done? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Shared Workbook creating Backup when saved? | Excel Discussion (Misc queries) | |||
Remember last saved for shared workbook | Excel Discussion (Misc queries) | |||
How do I add an alert message upon a user closing the workbook? | Excel Discussion (Misc queries) | |||
Phantom documents saved from shared workbook | Excel Worksheet Functions | |||
Can I set an audio alert that triggers as Excel cell value chgs? | Excel Discussion (Misc queries) |