Looping through an array to perform functions

[vbaNumpty]

I am having trouble figuring out how to write code that will go through my array and perform actions based on a cells value.

I have an array set to a dynamic range and I am looking to have it parse the rows and look at the date value in the second column of the range and perform actions when the date is < the current date.

My code is

 Dim ordrList As Range
    Dim i As Integer
    Dim j As Integer
    Dim x As Integer
    Dim row As Range
    
    i = Sheet3.Range("T1").value  'number of lines (orders) from import data
    Set ordrList = Sheet3.Range("outdata")
    
    myarray = Sheet3.Range("outdata")
    
    For j = 1 To i
        For x = 1 To UBound(myarray, 2)
        Debug.Print (myarray(i, j))
        Next x
        
    Next j

Trying to play around with variables to get it to output the values, but the above is just printing the last value in the first column 12 times. I don't fully understand the Ubound argument either. If anyone could give me the framework for having the loop look at the value in the second column of the 12 column wide array and taking action that would be greatly appreciated!

 

[Snakehips]

@vbaNumpty does this edit help any...

Dim ordrList As Range
    Dim i As Integer
    Dim j As Integer
    Dim x As Integer
    Dim row As Range
    Dim myarray As Variant
    
    i = Sheet3.Range("T1").Value  'number of lines (orders) from import data
    Set ordrList = Sheet3.Range("outdata")
    
    myarray = ordrList
    
    For j = 1 To i
        If myarray(j, 2) < Date Then
        'do some stuff eg here is the value from columns 2 and 12 of the named range
        MsgBox "Date is  " & myarray(j, 2) & myarray(j, 12) & "is in col 12"
        End If
        
    Next j

 

[vbaNumpty]

@vbaNumpty does this edit help any...

Dim ordrList As Range
    Dim i As Integer
    Dim j As Integer
    Dim x As Integer
    Dim row As Range
    Dim myarray As Variant
   
    i = Sheet3.Range("T1").Value  'number of lines (orders) from import data
    Set ordrList = Sheet3.Range("outdata")
   
    myarray = ordrList
   
    For j = 1 To i
        If myarray(j, 2) < Date Then
        'do some stuff eg here is the value from columns 2 and 12 of the named range
        MsgBox "Date is  " & myarray(j, 2) & myarray(j, 12) & "is in col 12"
        End If
       
    Next j

Great, thank you very much!