#1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 4
Default Excel Status Toolbar

Hello,

Does anyone know if there is any way to set up the Status Toolbar so that we
can see BOTH Sum and Avg at the same time? It would save me having to switch
back and forth from one to the other all the time...

Thanks,
Hugues

  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 10,593
Default Excel Status Toolbar

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.DisplayStatusBar = True
On Error Resume Next
Application.StatusBar = "Average=" & Application.Average(Selection) & "; " &
_
"Count=" & Application.CountA(Selection) & "; " & _
"Count nums=" & Application.Count(Selection) & "; "
& _
"Sum=" & Application.Sum(Selection) & "; " & _
"Max=" & Application.Max(Selection) & "; " & _
"Min=" & Application.Min(Selection)
End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Hugues" wrote in message
...
Hello,

Does anyone know if there is any way to set up the Status Toolbar so that

we
can see BOTH Sum and Avg at the same time? It would save me having to

switch
back and forth from one to the other all the time...

Thanks,
Hugues



  #3   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 4
Default Excel Status Toolbar

Awesome Bob! Thanks!
I've got to learn VB...

Hugues


"Bob Phillips" wrote:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.DisplayStatusBar = True
On Error Resume Next
Application.StatusBar = "Average=" & Application.Average(Selection) & "; " &
_
"Count=" & Application.CountA(Selection) & "; " & _
"Count nums=" & Application.Count(Selection) & "; "
& _
"Sum=" & Application.Sum(Selection) & "; " & _
"Max=" & Application.Max(Selection) & "; " & _
"Min=" & Application.Min(Selection)
End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Hugues" wrote in message
...
Hello,

Does anyone know if there is any way to set up the Status Toolbar so that

we
can see BOTH Sum and Avg at the same time? It would save me having to

switch
back and forth from one to the other all the time...

Thanks,
Hugues




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
Using Excel 2000 VBA Application on Excel 2003 Excel Worksheet Functions 0 August 8th 06 02:36 AM
Excel Map Toolbar Sherwood Excel Discussion (Misc queries) 0 July 17th 06 05:48 PM
Removing custom toolbar from Excel 2003 [email protected] Excel Discussion (Misc queries) 0 July 14th 06 05:00 PM
I can't remove the Email button to the Standard toolbar in Excel Valerie Dyet Excel Discussion (Misc queries) 0 December 16th 05 08:10 PM
Calc status of open excel workbook should not overwrite another Michael Hill Setting up and Configuration of Excel 1 October 28th 05 06:48 PM


All times are GMT +1. The time now is 01:51 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"