Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi
I have a spreadsheet which requires iterative calculation. I have written code which gives the user the option to automatically enable iterative calculation through selection of a series of message boxes (see below). Private Sub Workbook_Open() returnvalue2 = 7 Do While returnvalue2 = 7 returnvalue1 = MsgBox("Before using this sheet ensure that ITERATION is switched on!" & Chr(13) & "Would you like this to be automatically activated?", vbExclamation + vbYesNo, "Important") If returnvalue1 = 6 Then returnvalue2 = 0 Application.Iteration = True Application.Calculation = xlCalculationAutomatic Exit Do Else returnvalue2 = MsgBox("Not activating ITERATIVE CALCULATION will cause the spreadsheet to give incorrect values." & Chr(13) & "Are you sure you do not want to activate ITERATIVE CALCULATION?", vbCritical + vbYesNo, "VERY IMPORTANT") If returnvalue2 = 6 Then Exit Do End If End If Loop End Sub This works perfectly except that when the workbook is opened, the excel circular reference warning comes up automatically if iterative calculation is not active. And then excel help opens and things just get out of hand with messageboxes popping up all over the place. What I'd like to do is interrupt the workbook open event and allow my code to run before any built-in checks. How do I do this? |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Workbook_open Event | Excel Programming | |||
WORKBOOK_OPEN event | Excel Programming | |||
Workbook_Open() Event | Excel Discussion (Misc queries) | |||
Workbook_open Event | Excel Programming | |||
OnTime event not firing in Workbook_Open event procedure | Excel Programming |