Problem declaring an array

[LydiasDad]

I'm creating an array to hold integer values. CurrentCell has been set correctly.

Range(CurrentCell).Select
ActiveCell.Offset(-2, 0).Select
Dividend = ActiveCell.Value

Dim Divisors(1 To Dividend) As Long

During compile (it's not even running), it tells me that Dividend has to be a "constant" value. It is, so I don't know what's wrong. Tried to use Integer instead of Long as well.

[MarvinP]

Hi LydiasDad (When my son turned 12 I became TylersDad, knowing nobody cared about me anymore)

In the back of my mind is a little bird which says Arrays need to be declared as type variant. I wonder if it could be that easy?

http://msdn.microsoft.com/en-us/libr...(v=VS.60).aspx

[LydiasDad]

Nope, no luck. Same error. I've researched on the web and there are many examples using Long and String. Don't know why mine doesn't work.

[Mordred]

Can you give some more code, perhaps the whole Sub of Function procedure?

[Mordred]

Also, what is the value and its format at

Please Login or Register  to view this content.

?

[LydiasDad]

Here you go. I'm attaching the entire thing. Just click on the Refresh button to run the code. Thanks much.

[MarvinP]

Hi,

It looks like the compiler didn't like a variable in the Dim Statement. You have:

Please Login or Register  to view this content.

Change this above line to

Please Login or Register  to view this content.

and it runs fine for me.

I'm reading http://msdn.microsoft.com/en-us/libr...ffice.10).aspx to see if it ever says they must be constants.

[snb]

The answer is on your computer: VBEditor F1

You can't dimension an array using a variable. With Redim you can.
you can use:

Please Login or Register  to view this content.

but you can't

Please Login or Register  to view this content.

[MarvinP]

Hey snb

These dim redims are a little discombobulating in my mind.

Thanks for the edited explanation. This helps me understand them better.

[LydiasDad]

Still no luck. I used the following:

Dim Divisors() As Integer
ReDim Divisors(1 To Dividend)

I also used ReDim Divisors(Dividend) for that last line.

Now I get "subscript out of range".

[snb]

The only problem arises in the subscript in combination with 'To'.
But you can tackle that using 'option base'.

Please Login or Register  to view this content.

[LydiasDad]

Hey, thanks for the response, but I don't understand your post. What is snb and msgbox and ubound, and what do they have to do with declaring an array? I just need to declare an array that has up to "Dividend" elements.

[Mordred]

These dim redims are a little discombobulating in my mind.

I don't know what it is about that line that cracks me up (perhaps the word discombobulating [and yes I've heard the word before]).

[Mordred]

Hey, thanks for the response, but I don't understand your post. What is snb and msgbox and ubound, and what do they have to do with declaring an array? I just need to declare an array that has up to "Dividend" elements.

Hi LydiasDad,

snb is snb, he's trying to help you!
UBound finds the upper bound or last index of the array. So, the the array is 1 to 3, 3 would be the UBound.
To declare up to 'Dividend',

Please Login or Register  to view this content.

Adapt this to your actual code and you're golden

[romperstomper]

If you are getting a subscript out of range error, then either Dividend is less than 1 (you can't declare an array as 1 to 0 for example) or you referring to an element of the array that doesn't exist in a later piece of code.

[romperstomper]

To declare up to 'Dividend',

Please Login or Register  to view this content.

This assumes you have an option base 1 statement at the top of the module - the default is base 0, so you should loop from 0, not 1. Better to loop from Lbound to Ubound though.