Error when reading the array values

Question

Hello All,

 

           Actually i was filling the array with the range then i am not able to ready array items when trying to read its throws error Index was outside the bounds of the array,below is my code .Please help me .

 

Dim ExcelRangeArray(14, 0),arValue

ExcelRangeArray = objApp.Sheets("Sheet1").Range("A4:A14").Value

 

Here  ExcelRangeArray contains all the data from a1 to a 14  but not able to read the values

 

 arValue =ExcelRangeArray(5,0) ->  This throws error

 

 

Thanks & Regards,

Sampath