Im wondering how to create data types for my 3-d array. I really only need it on the x,y variable in the initialization route. I'm at a loss how to do this. Below is how I'm creating the array, and I can use it but I'd prefer to have more control. To give an example: It would be gret to something like
dim miultisheetArray(11 as Type1, 7 as Type2, 3 as Type3) as Variant. So that I could do a call like
multisheetArray.Type1Var.Type2Var.Type3Var. Like a 1-d array but for 3-d. Thanks.
Sub Test3DArray() Dim w As Long, x As Long, y As Long, z As Long Dim c As Range Dim v As Variant Dim multiSheetArray(11, 7, 3) As Variant 'array with 3 sheets, 5 columns/rows With Worksheets("Sheet1") 'start at Cells(10,4) Dim startingRow, startingColumn, staggeredYears As Integer startingRow = 10 startingColumn = 4 staggeredYears = 3 For w = 0 To 10 For x = 0 To 6 For y = 0 To 2 multiSheetArray(w, x, y) = .Cells(x + startingRow, y + startingColumn + (w * staggeredYears)) Next Next Next End With End Sub