Sub MI_Merge_FV()
Dim i&, k&: k = 1
For i = 1 To Cells(Rows.Count, 2).End(xlUp).Row
    If Left(Cells(i, 2), 1) = "T" Then
        Cells(k, 1).Resize(i - k).Merge
        k = i + 1
    End If
Next i
End Sub
How Do I stop the code from telling me that only the top left value will remain and go in to debug mode when there is nothing to merge?

Cross Post:
http://www.msofficeforums.com/excel-...html#post91290
http://www.mrexcel.com/forum/excel-q...ml#post4339619