Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Robert
 
Posts: n/a
Default Calc mode display on worksheet

Is there anyway to display on the worksheet itself of the Calculation mode ie
automatic or manual.
Thank you
Robert
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Arvi Laanemets
 
Posts: n/a
Default Calc mode display on worksheet

Hi

This UDF does it - save it into any workbook module, and then use the
formula <=CALCMODE(NOW()) in any cell:

Public Function CalcMode(Optional parTime As Date) As String
Select Case True
Case Application.Calculation = xlCalculationAutomatic
CalcMode = "Automatic"
Case Application.Calculation = xlCalculationManual
CalcMode = "Manual"
Case Application.Calculation = xlCalculationSemiautomatic
CalcMode = "Semiautomatic"
End Select
End Function


--
Arvi Laanemets
( My real mail address: arvi.laanemets<attarkon.ee )


"Robert" wrote in message
...
Is there anyway to display on the worksheet itself of the Calculation mode
ie
automatic or manual.
Thank you
Robert



  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Stefi
 
Posts: n/a
Default Calc mode display on worksheet

Try this UDF:
Function calcmod()
kalkmod = IIf(Application.Calculation = xlAutomatic, "AUT", "MAN")
End Function

Regards,
Stefi


€˛Robert€¯ ezt Ć*rta:

Is there anyway to display on the worksheet itself of the Calculation mode ie
automatic or manual.
Thank you
Robert

  #4   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Robert
 
Posts: n/a
Default Calc mode display on worksheet

Arvi, Thank you very much. Exactly as I wanted
--
Robert


"Arvi Laanemets" wrote:

Hi

This UDF does it - save it into any workbook module, and then use the
formula <=CALCMODE(NOW()) in any cell:

Public Function CalcMode(Optional parTime As Date) As String
Select Case True
Case Application.Calculation = xlCalculationAutomatic
CalcMode = "Automatic"
Case Application.Calculation = xlCalculationManual
CalcMode = "Manual"
Case Application.Calculation = xlCalculationSemiautomatic
CalcMode = "Semiautomatic"
End Select
End Function


--
Arvi Laanemets
( My real mail address: arvi.laanemets<attarkon.ee )


"Robert" wrote in message
...
Is there anyway to display on the worksheet itself of the Calculation mode
ie
automatic or manual.
Thank you
Robert




  #5   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Robert
 
Posts: n/a
Default Calc mode display on worksheet

I am sure Stefi was right but I could not get it to work. Even getting Arvi's
to work was difficult, I did not know how to set up a UDF. Finally made it
with Arvis).
Thank you Stefi
--
Robert




  #6   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Max
 
Posts: n/a
Default Calc mode display on worksheet

Maybe also, placed in any cell: =INFO("recalc")
--
Rgds
Max
xl 97
---
Singapore, GMT+8
xdemechanik
http://savefile.com/projects/236895
--


  #7   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Niek Otten
 
Posts: n/a
Default Calc mode display on worksheet

Hi Max,

Why "maybe"? This is certainly a correct and simple solution

--
Kind regards,

Niek Otten

"Max" wrote in message
...
Maybe also, placed in any cell: =INFO("recalc")
--
Rgds
Max
xl 97
---
Singapore, GMT+8
xdemechanik
http://savefile.com/projects/236895
--




  #8   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Max
 
Posts: n/a
Default Calc mode display on worksheet

Why "maybe"? ...
Guess it's polite to use such words, Niek
Thanks for comments
--
Rgds
Max
xl 97
---
Singapore, GMT+8
xdemechanik
http://savefile.com/projects/236895
--


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
One worksheet to calulate different items simultaneously John Excel Worksheet Functions 4 November 28th 05 08:07 PM
Extracting data from one Worsheet to Another Worksheet with common link value Edwin Mashiringwani Excel Discussion (Misc queries) 1 November 25th 05 04:14 AM
Search a worksheet, extract rows using a list from another sheet bobf Excel Discussion (Misc queries) 9 August 31st 05 04:56 AM
Comparing a list to a Calendar worksheet. PatrickL Excel Worksheet Functions 0 August 25th 05 04:21 PM
Worksheet name and Backward compatibility Rich Excel Discussion (Misc queries) 3 November 30th 04 07:10 PM


All times are GMT +1. The time now is 06:38 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"