Array Of Information In One Cell?

I've done some basic ADA-programming before that in my head can solve it, but as I said, I'm not quite sure VBA can do the trick...The problem I have is that I have a worksheet that consists of a combination of empty cells and values. For each cell with a value there are 5 more values unique for that cell that can be found at other parts of the worksheet. My job right now is to sort all this data..To do that, i would like to create this; Array_all_orders = (rows, columns) where every "cell" in that array contains a variable that hold those six values..

Here's the code I have so far:Sub Order_Array()

Application.ScreenUpdating = False
Dim Array_all_Orders() As Variant, Order_Width_Array(0 To 5) As Variant
Dim No_of_Rows As Long, No_of_Columns As Long
Dim Array_Row_Counter As Long, Array_Column_Counter As Long, Counter As Long
ActiveWorkbook.Sheets("RO").Activate
No_of_Rows = Range("A5", Range("A4").End(xlDown)).Cells.Count - 1
No_of_Columns = Range("K4", Range("K4").End(xlToRight)).Cells.Count

ReDim Array_all_Orders(1 To No_of_Rows, 1 To No_of_Columns)

[Code] ..........