Sample Array
Todd,
Perhaps you should explain what you are trying to do, but I doubt that you will achieve it using Option Base.
Option Base can only be used in the declarations section (at the top of a module before any routines are defined.) It affects the
starting index of all arrays in the module. Under Option Base 0 the following declares a four element arrray with indeces 0, 1, 2
and 3
Dim x(3)
Under Option Base 1 it defines a three element array with indeces 1, 2 and 3.
Option Base can always be over-riden by explicitly setting the range:
Dim x (1 to 3)
When you assign an array to a range it makes no difference what the option base is or what the first index value is. The first
element of the array is assigned to the first cell in the range.
--
John Green - Excel MVP
Sydney
Australia
"Todd Huttenstine" wrote in message ...
Below is a test array. I am trying to use the Option Base
statement to make the default index set to 1 instead of
0. If I were to insert the code: Option Base 1 at the
start of the code, then I would think the result in cell
J2 would = 7. When I dont use Option base 1 statement(run
code like it is shown below) the result of cell J2 is
equal to 3 as expected, when I run the code and change the
line of the code from Range("J2").Value = Bird to Range
("J2").Value = Bird(1), the result of J2 is equal to 7 as
expected, but why when I keep the code as it is below and
add the Option Base 1 below the Private Sub
CommandButton1_Click() it gives me the error "Compile
error: Invalid inside procedure."?
Private Sub CommandButton1_Click()
Dim Bird(2) As Integer
Bird(0) = 3
Bird(1) = 7
Range("J2").Value = Bird
End Sub
Thanx
Todd Huttenstine
|