The code below is used to place an identified value greater than the cell of the same column in the previous row if the values between the two other cells in each row are different. This works well when there is 26 or fewer different compariasons. (building A, B, C,... etc.)
I'm looking for a version that will conitnue adding +1 to the previous cell value either numerically. (1, 2, ... but continue adding +1 after it reaches 9) If you change to lastletter = "1" than after 9 it uses symbols and then letters.
Code being used:
lastletter = "A"
Cells(2, 16) = lastletter
For intalpha = 3 To Cells(65536, 3).End(xlUp).Row
If Cells(intalpha, 2) = 0 Then lastletter = Chr(Asc(lastletter) + 1)
Cells(intalpha, 16) = lastletter
Next intalpha
I'm looking for a version that will conitnue adding +1 to the previous cell value either numerically. (1, 2, ... but continue adding +1 after it reaches 9) If you change to lastletter = "1" than after 9 it uses symbols and then letters.
Code being used:
lastletter = "A"
Cells(2, 16) = lastletter
For intalpha = 3 To Cells(65536, 3).End(xlUp).Row
If Cells(intalpha, 2) = 0 Then lastletter = Chr(Asc(lastletter) + 1)
Cells(intalpha, 16) = lastletter
Next intalpha