You cannot make the sum number on the status bar larger without changing
your display appearance or theme in Windows settings.

Try either of these macros to sum the selection.

Sub Sum_Range()
Set rng = Selection
Set rng1 = rng.Offset(rng.Rows.Count, 0).Resize(1, 1)
rng1.Formula = "=Sum(" & rng.Address & ")"
End Sub

Sub Sum_Range22()
Set rng = Selection
MsgBox WorksheetFunction.Sum(rng)
End Sub


Gord Dibben MS Excel MVP

On Mon, 13 Oct 2008 07:18:01 -0700, Brian
wrote:

Is there a way to make the sum number on the status bar bigger or is there a
function that will give the sum of highlighted cells in another cell?