Help converting one-dimensional array to multi-dimensional array

Hi all,

I have the following bit of code that works well for populating a one-dimensional array, but I'd like to have it be multi-dimensional to grab a bit more data. I'm mostly hung up on how this affects ReDim Preserve. I know I need to add another loop, but not sure where it should go.

Thanks for your help!

    'populate array
    i = 0
    For Each cell In Worksheets("data").Range("A2:A" & LastRow).Cells
        If cell.Value = sDate Then
            If Worksheets("data").Cells(cell.Row, "B").Value = RefType Then
                If Worksheets("data").Cells(cell.Row, "F").Value = DeviceCategory Then
                    If Worksheets("data").Cells(cell.Row, "E").Value = Headline Then
                        ReDim Preserve RefSourceArray(i)
                        RefSourceArray(i) = cell.Offset(0, 2).Value
                        i = i + 1
                    End If
                End If
            End If
        End If
    Next cell