Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 7.7 и ранее

v7: Помогите перегнать цифры в буквы по принципу растягивания столбцов в эксель

v7: Помогите перегнать цифры в буквы по принципу растягивания столбцов в эксель
Я
   sysadminlk
 
02.12.20 - 20:57
По принципу:

1    2    3    4    5    6    7    8    9    10    11    12    13    14    15    16    17    18    19    20    21    22    23    24    25    26    27    28    29    30
A    B    C    D    E    F    G    H    I    J    K    L    M    N    O    P    Q    R    S    T    U    V    W    X    Y    Z    AA    AB    AC    AD

Чтоб на вход я давал число например 30 а оно мне в ответ AD

И функция декодер, я ей даю AD а она мне в ответ 30

скорее всего уже есть решения, но я найти не могу
   ДенисЧ
 
1 - 02.12.20 - 21:04
Функция перевода числа в n-ричную систему пишется на уроках информатики в 10м классе.
   trad
 
2 - 02.12.20 - 21:05
_idtostr()
_strtoid()
   Михаил Козлов
 
3 - 02.12.20 - 21:06
26 букв латиницы. AD = 1(A)*26+4(D). Обратно: 30/26=1(A)+(30-26=4)D.
   sysadminlk
 
4 - 02.12.20 - 21:47
(2) спасибо, очень близко только экселька так не умеет
   Cthulhu
 
5 - 02.12.20 - 21:56
тебе формулу в екселе надо штль?.. а при чем тут 1с???
   sysadminlk
 
6 - 02.12.20 - 22:37
(5) мне нужно эксель файлы перебирать одинэсом
   trad
 
7 - 02.12.20 - 22:47
(6) одинесом хочешь перебирать, тогда зачем эксельке уметь (2) ?
(2) - это умеет одинес семьсемь
   Cthulhu
 
8 - 02.12.20 - 22:53
(6) дык (2) ёжмаёж
   Chameleon1980
 
9 - 02.12.20 - 23:19
дык там жеж, вроде хоть по цифре :)
   RomanYS
 
10 - 02.12.20 - 23:29
   Arbuz
 
11 - 08.12.20 - 12:45
(0)
//======================================================================

Функция ВСтолбецЭкселя(Номер)
    Перем А,Результат;
    А = Номер;
    Результат = "";
    Пока А > 0 Цикл
        Результат = Симв(((А - 1) % 26) + 65) + Результат;
        А = Цел((А - 1) / 26);
    КонецЦикла;    
    Возврат Результат;
КонецФункции// ВСтолбецЭкселя

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.