ZAHL2CHR / Get_Excel_Column_ID - DC_WorkArea2Excel

[Auge_Ohr]

hi,

i did found a Error in my Function ZAHL2CHR which make same like Get_Excel_Column_ID / DC_WorkArea2Excel

use 51 Column -> "AY" but 52 gave -> "BA" which is 53 ... all "*Z" are missing

Code: Select all

// correct Version up to 702 -> "ZZ"

FUNCTION ZAHL2CHR(nLFcount)
LOCAL nMal
LOCAL cEnde

   IF nLFcount > 26
      nMal  := INT(nLFcount/26)
      IF nMal = nLFcount/26             //new
         cEnde := CHR(nMal+64-1) + "Z" // new
      ELSE
         cEnde := CHR(nMal+64)+CHR((nLFcount-(nMal*26))+64)
      ENDIF
   ELSE
      cEnde := CHR(nLFcount+64)
   ENDIF

RETURN cEnde