How can i generate next increment number for alphanumeric serial . i.e first cheractor is alphabet and next four cherectors are numeric. ( N1125 )

"N" & format$(val(right$(SerialNo,4))+1,"0000")

1.try using ascii value of the character.
2.increment the number part till max value
3.increment the ascii value by 1(one) and repeat step-2