[sergvg]

Delirium, я для себя старался, мне нужно генерировать данные в эксель, использую Perl и Win32::OLE. Так там надо указывать диапазон ячеек в A1-стиле. В общем, задача схожая с твоей .

pva, первый код не проверял, но во втором, кажись, надо вычесть единицу из аргумента...

Код:

sub rc2a1_pva($){
   my $str=undef;
   my $a =shift;
   $a--;
   do {
      $str=chr(65 + ($a%26)).$str;
      $a=int($a/26)-1;
   } while ($a!=-1);
   return $str;
}