okay I put

if intr(1,vtmp(n),"FF") then (as below)

and it only captures the rows that have the FF in them but when these rows are placed within the worksheet location is the relative position within the original array. How do I close up the blank rows above and below within the array before placing into the worksheet range?



ReDim Arr(1 To lMaxRows, 1 To lMaxCols)
For n = LBound(vTmp) To UBound(vTmp)
If InStr(1, vTmp(n), "FF") Then
v1 = Split(vTmp(n), Delimiter)
For K = LBound(v1) To UBound(v1)
Arr(n + 1, K + 1) = v1(K)
Next 'k
End If
Next 'n