How do i correctt he following code for merging rows of columns A1 which has
the same value.. foreg., teh column is sorted. Now if i have 3 names aclled
A, i should mak ethem as one A and when i reach teh next row with another
name B it shouls check till where teh name B is and should merge the entire B
into one B . Is it possible thru teh following code. i have given 2 codes ,
both don work Pls rectify.. Thank you for any help provided in advance.



Sub merge()
Dim i As Long, j As Long
Selection = RAnge ("A1:A1000")
For i = 3 To Selection.Areas.Count
For j = 3 To Selection.Areas(i).Rows.Count
Application.DisplayAlerts = False
Selection.Areas(i).Rows(j).MergeCells = True
Next
Next

End Sub



( or)


Name = "A"
st = i
en = i
for i = 3 to 1000
If (Name = Sheets("FTP").Cells(i, 1).Value) Then
Range("A" &st& ":Je" &en).Merge
name = Sheets("FTP").Cells(i+1, 2).Value

Else
st = i + 1
en = i
End If