Problemas con Visual Basic con Excel

[erbuson]

Hola, analizando el código me temo que la operacion a la inversa es del todo imposible, básicamente porque las dos últimas cifras te devuelven una letra, de la manera
01 a 10 = A
11 a 19 = B
20 a 99 = C

Entonces es imposible que conociendo sólo B sepas a que valor corresponde ya que por ejemplo

1111 = 6B
1112 = 6B
1113 = 6B
1119 = 6B

Creo que si debes hacer la conversión, tendrás que buscar una solución de compactacion diferente.

Saludos