# Unique text formula question in excel

Solved/Closed
Related:

- Unique text formula question in excel
- Excel date format dd.mm.yyyy - Guide
- Number to words in excel formula - Guide
- Mark sheet grade formula in excel download - Guide
- Excel @ in formula ✓ - Excel Forum

## 1 reply

Cells.Select

Selection.Sort _

Key1:=Range("B2"), Order1:=xlAscending, _

Key2:=Range("C2"), Order2:=xlAscending, _

Key3:=Range("A2"), Order3:=xlAscending, _

Header:=xlYes, OrderCustom:=1, _

MatchCase:=False, Orientation:=xlTopToBottom, _

DataOption1:=xlSortNormal, _

DataOption2:=xlSortNormal, _

DataOption3:=xlSortNormal

lrow = 2

AddedByName = Cells(lrow, 2)

addCount = -1

Do While Cells(lrow, 1) <> ""

If (AddedByName <> Cells(lrow, 2)) Then

addCount = -1

AddedByName = Cells(lrow, 2)

End If

addCount = addCount + 1

Cells(lrow, 4) = addCount

lrow = lrow + 1

Loop