MsgBox "Number of changes is: " &
ActiveSheet.Evaluate(ActiveWorkbook.Names("changes ").RefersTo)


--
HTH

Bob Phillips

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

wrote in message
ups.com...
This is frustrating me to no end... I feel like it must be something
simple and I am missing it.

I have names defined in my worksheet which are defined as calculations.


I want to use those name (calculations) in my Macro's to display a
message box.

For example Changes is defined as =counta($A:$A) and I want to display
a message box which say "The number of Changes is: (number of changes)"

Help please!