Activecell.value = constName
where you replace constName with the name of the constant

Signature
Hth
Kassie Kasselman
Change xxx to hotmail
> When using this function : Selection.PasteSpecial
> Paste:=xlValues,Operation:=xlNone, SkipBlanks:= _
> False, Transpose:=False
>
> How do I change it to past a Public Constant?
kassie - 20 Sep 2007 19:14 GMT
My pleasure!

Signature
Hth
Kassie Kasselman
Change xxx to hotmail
> Activecell.value = constName
> where you replace constName with the name of the constant
[quoted text clipped - 4 lines]
> >
> > How do I change it to past a Public Constant?
JE McGimpsey - 20 Sep 2007 20:59 GMT
One caveat:
Instead of ActiveCell, to be fully equivalent, one should use Selection:
Selection.Value = constName
since in the OP's example, Selection could involve multiple cells.
> Activecell.value = constName
> where you replace constName with the name of the constant
[quoted text clipped - 4 lines]
> >
> > How do I change it to past a Public Constant?
Thanks Kassie, worked like a champ.
> When using this function : Selection.PasteSpecial
> Paste:=xlValues,Operation:=xlNone, SkipBlanks:= _
> False, Transpose:=False
>
> How do I change it to past a Public Constant?