Perhaps something along these lines but i need more information from
you:
VBA Code:
--------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Me.Range("A1").Value = "No" Then
Application.Calculation = xlCalculationManual
Else
Application.Calculation = xlCalculationManual
End If
End Sub
--------------------
*How to Save a Worksheet Event Macro*
1. *Copy* the macro above placing the cursor to the left of the code
box hold the *CTRL & Left Click,* then *Right Click* selected code and
*Copy.*
2. Open your Workbook and *Right Click* on the *Worksheet's Name Tab*
for the Worksheet the macro will run on.
3. *Left Click* on *View Code* in the pop up menu.
4. *Paste* the macro code using *CTRL+V*
5. Make any custom changes to the macro if needed at this time.
6. *Save* the macro in your Workbook using *CTRL+S*
Rob52;645889 Wrote:
I have a cell with the following calculation
=IF(AND(C62-C560,C70-C660),"Yes - Loan Should be
Approved",IF(AND(C62-C56<0,C70-C66<0),"No - Speak to your
Advisor.","Possible
- Depending on Detailed Application, speak to your Banker"))
Now it works ok but I want to stop it calculating until the "user"
requests
an answer.
The second part is how do i tell the spreadsheet to remove all data in
"unprotected cells"?
The idea the user opens the spreadsheet completes a series of cells
then
selects answer to display then closes out without saving the data so
the the
spreadsheet is blank on reopening.
--
Rob52r
--
Simon Lloyd
Regards,
Simon Lloyd
'Microsoft Office Help' (
http://www.thecodecage.com)
------------------------------------------------------------------------
Simon Lloyd's Profile: 1
View this thread:
http://www.thecodecage.com/forumz/sh...d.php?t=180015
Microsoft Office Help