String Array initialisation

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

major_yash@yahoo.com - 29 Jun 2006 21:02 GMT

Hi,

I am facing a problem in intialising a string array in VBA. I need to
intialise an array of 10 elements from data in a range. This range has
text values. I tried to use following.

[code]

Dim VarNames() As String
....
VarNames = ActiveSheet.Range("K22:K32").Value
....

[/code]

But I am getting Type Mismatch error. I don't want to use any loop to
populate the array. Filling each value is cumbersome.

Can anybody please suggest some way around.

Thanks,

Mhr

Reply to this Message

RB Smissaert - 29 Jun 2006 21:47 GMT

This will work:

Dim VarNames

VarNames = ActiveSheet.Range("K22:K32").Value

RBS

> Hi,
>
[quoted text clipped - 19 lines]
>
> Mhr

Reply to this Message

Alan Beban - 30 Jun 2006 21:59 GMT

If it is unacceptable for VarNames to be of Variant() type (which is
what the other replies in this thread have provided), then if the
functions in the freely downloadable file at
http:/home.pacbell.net/beban are available to your workbook

Sub test2()
Dim VarNames() As String
Assign ActiveSheet.Range("K22:K32"), VarNames
End Sub

Alan Beban

> Hi,
>
[quoted text clipped - 19 lines]
>
> Mhr

Reply to this Message