2007 Status Bar in Excel 2003
 

I have Excel 2007 at home and like the new functionality in the status bar
where it will show sum, count, average etc. At work I only have 2003. Is
there a way to create that functionality in 2003 using VBA? I appreciate the
help.

B

2007 Status Bar in Excel 2003
 

Right-click in the area where the Sum etc should be. You get several options.

--
Kind regards,

Niek Otten
Microsoft MVP - Excel

"Brennan" wrote in message ...
|I have Excel 2007 at home and like the new functionality in the status bar
| where it will show sum, count, average etc. At work I only have 2003. Is
| there a way to create that functionality in 2003 using VBA? I appreciate the
| help.
|
| B

2007 Status Bar in Excel 2003
 

HI Niek,

Thanks for your reply. I would like for the status bar to show multiple
categories, not just the one category. So for example, I would like to
highlight some cells and see the count, sum and average, not just the sum.
Please let me know if there is a way to do this. Thanks

B

"Niek Otten" wrote:

Right-click in the area where the Sum etc should be. You get several options.

--
Kind regards,

Niek Otten
Microsoft MVP - Excel

"Brennan" wrote in message ...
|I have Excel 2007 at home and like the new functionality in the status bar
| where it will show sum, count, average etc. At work I only have 2003. Is
| there a way to create that functionality in 2003 using VBA? I appreciate the
| help.
|
| B

2007 Status Bar in Excel 2003
 

I don't think that can be done without VBA programming

--
Kind regards,

Niek Otten
Microsoft MVP - Excel

"Brennan" wrote in message ...
| HI Niek,
|
| Thanks for your reply. I would like for the status bar to show multiple
| categories, not just the one category. So for example, I would like to
| highlight some cells and see the count, sum and average, not just the sum.
| Please let me know if there is a way to do this. Thanks
|
| B
|
| "Niek Otten" wrote:
|
| Right-click in the area where the Sum etc should be. You get several options.
|
| --
| Kind regards,
|
| Niek Otten
| Microsoft MVP - Excel
|
| "Brennan" wrote in message ...
| |I have Excel 2007 at home and like the new functionality in the status bar
| | where it will show sum, count, average etc. At work I only have 2003. Is
| | there a way to create that functionality in 2003 using VBA? I appreciate the
| | help.
| |
| | B
|
|
|

2007 Status Bar in Excel 2003
 

Thanks Niek,

Any chance you know the VBA code for this? I am fairly comfortable with
VBA. Thanks

B

2007 Status Bar in Excel 2003
 

<Any chance you know the VBA code for this?

No, Sorry!


"Brennan" wrote in message ...
| Thanks Niek,
|
| Any chance you know the VBA code for this? I am fairly comfortable with
| VBA. Thanks
|
| B

2007 Status Bar in Excel 2003
 

I don't think that can be done without VBA programming

I doubt even with VBA, Niek<g.

--
Jim
"Niek Otten" wrote in message
...
|I don't think that can be done without VBA programming
|
| --
| Kind regards,
|
| Niek Otten
| Microsoft MVP - Excel
|
| "Brennan" wrote in message
...
|| HI Niek,
||
|| Thanks for your reply. I would like for the status bar to show multiple
|| categories, not just the one category. So for example, I would like to
|| highlight some cells and see the count, sum and average, not just the
sum.
|| Please let me know if there is a way to do this. Thanks
||
|| B
||
|| "Niek Otten" wrote:
||
|| Right-click in the area where the Sum etc should be. You get several
options.
||
|| --
|| Kind regards,
||
|| Niek Otten
|| Microsoft MVP - Excel
||
|| "Brennan" wrote in message
...
|| |I have Excel 2007 at home and like the new functionality in the status
bar
|| | where it will show sum, count, average etc. At work I only have
2003. Is
|| | there a way to create that functionality in 2003 using VBA? I
appreciate the
|| | help.
|| |
|| | B
||
||
||
|
|

2007 Status Bar in Excel 2003
 

Try this in the ThisWorkbook. module (rt-click icon next to File, view code)

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
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)
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) ' etc
End If
errH:
Application.StatusBar = s

End Sub

If some non-range object is selected the statusbar will not be cancelled.
If it does what you want you could put it in a class module that traps
application level events in an addin or your Personal.

Regards,
Peter T

"Brennan" wrote in message
...
Thanks Niek,

Any chance you know the VBA code for this? I am fairly comfortable with
VBA. Thanks

B