A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Excel » General Discussion
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

Excel Set Up - Auto Sum



 
 
Thread Tools Display Modes
  #1  
Old April 10th, 2009, 10:04 PM posted to microsoft.public.excel.misc
Brian
external usenet poster
 
Posts: 1,396
Default Excel Set Up - Auto Sum

At the bottom of the excel worksheet - there is an ability to set up to
display a sum (or average or count or...) of a column. Can Excel be set up
to display more than one option at a time?
  #2  
Old April 10th, 2009, 10:18 PM posted to microsoft.public.excel.misc
Sheeloo[_5_]
external usenet poster
 
Posts: 239
Default Excel Set Up - Auto Sum

Not in versions upto Excel 2003...
Excel 2007 shows SUM, COUNT and AVERAGE... (not in that order)

-------------------------------------
Pl. click ''''Yes'''' if this was helpful...



"brian" wrote:

At the bottom of the excel worksheet - there is an ability to set up to
display a sum (or average or count or...) of a column. Can Excel be set up
to display more than one option at a time?

  #3  
Old April 11th, 2009, 05:31 PM posted to microsoft.public.excel.misc
Gord Dibben
external usenet poster
 
Posts: 20,252
Default Excel Set Up - Auto Sum

This code placed in Thisworkbook module will give you 4 functions on the
status bar.

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'add the functions to the status bar
Application.StatusBar = False
If TypeName(Selection) = "Range" Then
Workbook_SheetSelectionChange Sh, Selection
End If
End Sub


Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
ByVal Target As Range)
'display the functions on the status bar
Dim s As String
Dim wfn As WorksheetFunction
Set wfn = Application.WorksheetFunction
On Error GoTo errH:
If wfn.Count(Target) 2 Then
s = ""
Else
s = "Sum=" & wfn.Sum(Target) & " " & _
"Avg=" & wfn.Average(Target) & " " & _
"Min=" & wfn.Min(Target) & " " & _
"Max=" & wfn.Max(Target) & " " & _
"Count=" & wfn.Count(Target)
End If
errH:
Application.StatusBar = s
End Sub


Gord Dibben MS Excel MVP

On Fri, 10 Apr 2009 14:04:11 -0700, brian
wrote:

At the bottom of the excel worksheet - there is an ability to set up to
display a sum (or average or count or...) of a column. Can Excel be set up
to display more than one option at a time?


 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump


All times are GMT +1. The time now is 05:53 AM.


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