Delphi-Quellcode:
Function ExcelSpalte (Nummer : Integer :
String;
Var
result :
string;
Begin
if (nummer<=0)
raise new
exception.Create('
Nummer muß > 0 sein');
result := '
';
repeat
result := Result+chr(64+nummer
mod 26);
nummer := nummer
div 26;
until nummer = 0;
// return result; so macht man das in C#, aber ist das C#? Nein. Delphi, also... weg.
end;
Das könnte funktionieren. Es konvertiert einfach eine Dezimalzahl in eine Zahl zur Basis 26, wobei die 'Ziffern' der neuen Zahlenbasis unseren Buchstaben A-Z entsprechen.