Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Protecting a workbook
I've had people diddling in the workbook by pressing "disable macros
instead of "enable macros". I've been able to get around this b setting the workbook as hidden and then unhiding it only when th macros are enabled. It is also set to hide again when the project i closed. In addition, I have the workbook book set to save automaticall on close, without prompting the user. My problem is, now that I hav put in the visible=False command in the before close, it no longe saves without prompting the user. I do not want the user prompted t save on close. The save on close without prompting worked fine until added the visible = false command. I just want the workbook to save and close automatically. Here is th code I have in the workbook module. ------- Private Sub Workbook_Open() Windows("B2B tracking.xls").Visible = True ' minimize all windows Except Xl Dim objShell As Object Set objShell = CreateObject("Shell.Application") objShell.MinimizeAll Application.Wait (Now + TimeValue("0:00:01")) Application.WindowState = xlMinimized Set objShell = Nothing Application.WindowState = xlMinimized ' Open user form Splash.Show ChooseForm.Show ' Update Form Workbooks("b2b tracking.xls").Save End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) Windows("B2B Tracking.xls").Visible = False ThisWorkbook.Save End Su -- Message posted from http://www.ExcelForum.com |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Protecting a workbook
Hi
try adding the line Application.displayalerts = false before your save command and the line Application.displayalerts = True after this command -- Regards Frank Kabel Frankfurt, Germany "rayzgurl " schrieb im Newsbeitrag ... I've had people diddling in the workbook by pressing "disable macros" instead of "enable macros". I've been able to get around this by setting the workbook as hidden and then unhiding it only when the macros are enabled. It is also set to hide again when the project is closed. In addition, I have the workbook book set to save automatically on close, without prompting the user. My problem is, now that I have put in the visible=False command in the before close, it no longer saves without prompting the user. I do not want the user prompted to save on close. The save on close without prompting worked fine until I added the visible = false command. I just want the workbook to save and close automatically. Here is the code I have in the workbook module. ------- Private Sub Workbook_Open() Windows("B2B tracking.xls").Visible = True ' minimize all windows Except Xl Dim objShell As Object Set objShell = CreateObject("Shell.Application") objShell.MinimizeAll Application.Wait (Now + TimeValue("0:00:01")) Application.WindowState = xlMinimized Set objShell = Nothing Application.WindowState = xlMinimized ' Open user form Splash.Show ChooseForm.Show ' Update Form Workbooks("b2b tracking.xls").Save End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) Windows("B2B Tracking.xls").Visible = False ThisWorkbook.Save End Sub --- Message posted from http://www.ExcelForum.com/ |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Protecting a workbook
Thanks Frank,
Sorry to say it is still prompting me to save the spreadsheet on close It has to have something to do with the fact that I am hiding it befor closing it. I'm just not sure what.... : -- Message posted from http://www.ExcelForum.com |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Protecting a workbook
Anyone have any idea how to get a hidden spreadsheet to stop promptin
for Save on close??? See code above... THANK!!!!! -- Message posted from http://www.ExcelForum.com |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Protecting a workbook
Have you tried putting in something like:
myworkbook.Saved = True after you save it? hth, Doug "rayzgurl " wrote in message ... Anyone have any idea how to get a hidden spreadsheet to stop prompting for Save on close??? See code above... THANK!!!!!! --- Message posted from http://www.ExcelForum.com/ |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Protecting a workbook
|
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Protecting a workbook | Excel Worksheet Functions | |||
Protecting a workbook | Excel Discussion (Misc queries) | |||
Protecting a workbook | Excel Discussion (Misc queries) | |||
Protecting Workbook!.. | Excel Worksheet Functions | |||
Protecting Workbook | Excel Discussion (Misc queries) |