Procédure pour convertir un indice de colonne en code 'Excel'
PROCEDURE Indice_Vers_Code(Par_IndiceColonne est un entier)
LOC_Res est une chaîne
LOC_Memoire est un entier
LOC_iAlpha est un entier = PartieEntière(Par_IndiceColonne / 27)
LOC_Memoire = Par_IndiceColonne - (LOC_iAlpha * 26)
SI LOC_iAlpha > 0 THEN
LOC_Res = Caract(LOC_iAlpha + 64)
FIN
SI LOC_Memoire > 0 THEN
LOC_Res += Caract(LOC_Memoire + 64)
END
RENVOYER LOC_Res