Evaluating a named constant

[Barb Reinhardt]

I've done this before, but not in a while and can't find any examples.

I have a named constant I call QADDate in workbook aWB. How do I evaluate
the value of this in VBA?

Thanks,
Barb Reinhardt

 

[Bernie Deitrick]

Barb,

MsgBox Evaluate("QADDate")

HTH,
Bernie
MS Excel MVP

 

[Barb Reinhardt]

That's not doing it Bernie. I'm getting

Run-time error 13
Type mismatch

Thanks,
Barb Reinhardt

 

[Bernie Deitrick]

Barb,

How did you define your named constant?

In code or as a name within the workbook:

Option Explicit
Const QADDate As Long = 4

Sub TryNow()
MsgBox QADDate
End Sub


The example that I gave was when creating a name...

 

[Charles Williams]

Try this:

Evaluate(Workbooks("aWB.xls").Names("QADDate").RefersTo)

Charles
___________________________________
The Excel Calculation Site
http://www.decisionmodels.com

 

[Barb Reinhardt]

It's a named constant (much like a named range). I've figured out how to
get to it, but still am interested in knowing how to evaluate named
constants.

Thanks,
Barb Reinhardt

 

[Bob Phillips]

application.evaluate(activeworkbook.Names("Bob").RefersTo)