Question : accéder au vba 2007 using le chr ()

Je travaille sur une fonction pour créer automatiquement beaucoup number.

This est le format :  GAA0001

It obtient d'abord le dernier nombre de sort employé du regard de table.
Then à la section numérique pour voir s'il est à 9999.
If ainsi, il doit regarder l'incrément la 3ème lettre.  Si la 3ème lettre est Z, devrait-elle le placer à A et incrémenter le 2ème letter.

I savoir que le chr (65) est « A » et le chr (90) est-il Z

Is là une manière de travailler à la 3ème lettre comme ceci ?
strCharacters =
strLetter = mi (les strCharacters, strLetter de 3)
if est plus grand que le strLetter du then
de chr (90) = le
endif

Then de chr (65) je continueront pour regarder et incrémenter la 2ème lettre si needed.

I me connaissent avoir un type de données disparités dans là… est qui ce qui j'essaye le travail around.

Thanks, le
Brooks
class= de

Réponse : accéder au vba 2007 using le chr ()

L'ASC devrait prendre la valeur d'ASCII du caractère et la vérifier

Vous pouvez également changer le cas à l'avance ainsi vous n'avez pas besoin de faire cela.

strCharacters = « GAA1234 »
strLetter = mi (UCase (strCharacters), 3)
si le strLetter est plus grand que le chr (90) alors
     strLetter = chr (65)
endif

L'UCASE supplémentaire devrait changer le cas en haut de casse ainsi vous obtenez TOUJOURS un caractère entre 65 et 90.