Code:
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.mrexcel.com/forum/excel-q...ml#post4339619
http://www.excelforum.com/excel-prog...ml#post4238629