Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Excel make Calculation MANUAL - dashboards again..... 1

Status
Not open for further replies.

Welshbird

IS-IT--Management
Jul 14, 2000
7,378
DE
Hi All,

Right, after much discussion here I finally got my dashboard working perfectly.

To do that I send the workbook with Tools> Options> Calculation> MANUAL.

Now, on the big bosses laptop this automatically resetsitself to Automatic and then blowsup in a heap.

Any suggestions please? She is the last person that I need this to happen with, so typically this is where it is happening.

Fee

"The cure for anything is salt water – sweat, tears, or the sea." Isak Dinesen
 



Hi,

alt+F11 toggles between the VB Editor and the worksheet.

In the VB Editor, ctr+R to view the Project Explorer.

In the Project Explorer open the VBA Project for your Workbook. You will see displayed an object tree of 1) each Worksheet in your workbook and 2) ThisWorkbook, which is the Workbook Object.

Right-click the ThisWorkbook object and select View Code

In the Code Window of the ThisWorkbook object paste this code that will run each time the workbook is opened...
Code:
Private Sub Workbook_Open()
    Application.Calculation = xlCalculationManual
End Sub
CAVEAT: The user MUST enable macro content when opening OR have selected the option to enable all macros without confirmation.

Skip,

[glasses]Just traded in my old subtlety...
for a NUANCE![tongue]
 
Wow. Speedy!

I just did that, sent it to her - watched her open it with macro's enabled, and it didn't work....

Somemore investigation me thinks...

Fee

"The cure for anything is salt water – sweat, tears, or the sea." Isak Dinesen
 
Actually - Is this because she has another workbook open first?

Fee

"The cure for anything is salt water – sweat, tears, or the sea." Isak Dinesen
 
No,

Paste this one in instead...
Code:
Private Sub Workbook_Open()
    Application.Calculation = xlCalculationManual

    MsgBox "MANUAL"
End Sub

SAVE & CLOSE the workbook

OPEN the workbook

ENABLE macros

OBSERVE the Message Box

CONFIRM that the calculation is MANUAL in practice.

Once this excersize is complete, you can DELETE the annoying
Code:
    MsgBox "MANUAL"
statement



If you do NOT observe the MANUAL message, either your code is NOT in the ThisWorkbook object code window or your macros are not enabled.


Skip,

[glasses]Just traded in my old subtlety...
for a NUANCE![tongue]
 
Thanks Skip => Off to test again.

Fee

"The cure for anything is salt water – sweat, tears, or the sea." Isak Dinesen
 
Skippy - You are magic innit.

Twinkly things in your direction.

Fee

"The cure for anything is salt water – sweat, tears, or the sea." Isak Dinesen
 


...and the solution was????

Skip,

[glasses]Just traded in my old subtlety...
for a NUANCE![tongue]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top