Sub FT()
Dim InsType As Range
Dim Rng As Range
Sheets("Computation").Select
For Each InsType In Range("H2", Range("H" & Rows.Count).End(xlUp))
If InsType.Value = "Cross Rate" Or InsType.Value = "Currency" And InStr(InsType.Offset(0, 8).Value, "Yes") Then...