پیدا کردن عناصر ارایه

[ma.andishe]

سلام
من یک ارایه دارم که چهار ستون دارد و تعداد سطرهای ان متغییر هستند
حالا میخواهم برخی از عناصر ستون 4 را پیدا کنم لطفا راهنمایی بفرمایید

For j = 0 To UBound(tmparr, 0)
For k = 0 To UBound(tmparr, 1)
For l = 0 To UBound(tmparr, 2)
For m = 0 To UBound(tmparr, 3)
If tmparr(j, k, l, m) <= 15 Then
MSChart1.row = Str(I + 1)
MSChart1.RowLabel = tmparr(m)
Else
' Exit For
End If
Next m
Next l
Next k
Next j

ضمنا میخواهم این عناصر روی محور x نمایش داده بشه