Hi,

Just wondering if it is possible to create a private constant array of
type string in excel 2000.

I want this constant string array to sit at the top of my module and
be used in the subs that follow.

Regards,
Tom

This is as close as I can come. It doesn't appear to be very efficient...
'--
Option Explicit
Private Const sNames As String = "Larry,Moe,Curly"

Sub Demo()
MsgBox Split(sNames, ",")(1) 'returns Moe
End Sub

--
Jim Cone
Portland, Oregon USA



<(E-Mail Removed)>
wrote in message
Hi,
Just wondering if it is possible to create a private constant array of
type string in excel 2000.
I want this constant string array to sit at the top of my module and
be used in the subs that follow.
Regards,
Tom

On May 22, 1:19*pm, "Jim Cone" <james.cone...@comcast.netxxx> wrote:
> This is as close as I can come. *It doesn't appear to be very efficient....
> '--
> Option Explicit
> Private Const sNames As String = "Larry,Moe,Curly"
>
> Sub Demo()
> * MsgBox Split(sNames, ",")(1) 'returns Moe
> End Sub
>
> --
> Jim Cone
> Portland, Oregon *USA
>
> <tomfabtas...@hotmail.com>
> wrote in message
> Hi,
> Just wondering if it is possible to create a private constant array of
> type string in excel 2000.
> I want this constant string array to sit at the top of my module and
> be used in the subs that follow.
> Regards,
> Tom

Perfect - thanks.