Place In Sequence Increasing The Numbers Of One I Creak In A Cell

I would like to place in sequence increasing the numbers of one I creak in a cell.
In the formula I determine it I creak and the corresponding frame number to the placed ones.
The problem is that he is accumulated only the greater and not sequencia it.

1803456781101112
1134567810111280

but,80-80

Function ordenar2(Myrange As Range, num As Integer) As String
Dim Myorder As Double
Dim X2 As String
Dim n As Integer
n = 1
Do While n