View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Ed[_18_] Ed[_18_] is offline
external usenet poster
 
Posts: 118
Default Create simple commandbutton for manual recalculation

Hi, Bryan. I'm not the most savvy person, so take my comments with large
grains of salt. But here's where I would start:
<snip
- Have *manual* calculation saved as the default behaviour for *this
spreadsheet only*.


In the ThisWorkbook module:
Private Sub Workbook_Open()
Application.Calculation = xlCalculationManual
End Sub

- Place a commandbutton (or the most appropriate widget) in the

spreadsheet
itself. The user would click this "Calculate Now" button to perform

manual
calculation of the spreadsheet once all data have been entered or

modified.

In the Sheet module:
Sub Calc
Calculate
End Sub

Assign this to your button.

These specific items are untested, though I've used similar items. Like I
said, I'm not the greatest, but this is where I would start.

HTH
Ed