On-line: гостей 0. Всего: 0 [подробнее..]
АвторСообщение



Пост N: 6
Зарегистрирован: 04.04.16
ссылка на сообщение  Отправлено: 21.10.16 03:22. Заголовок: EXCEL : преобразовать имя столбца в номер ?


Сейчас я пользуюсь такой формулой

local xCol_Where:=upper(wMain.txt_Col_Where.Value) //буква или цифра
local nCol_Where:=if(IsAlpha(xCol_Where), ASC(xCol_Where)-ASC('A')+1, val(xCol_Where))

Но такое не работает в общем виде - начиная с столбца AA.

Есть ли у кого нибудь более общий и точный вариант?

Может можно через ОЛЕ и ВБА преобразовать?


Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 2 [только новые]


администратор




Пост N: 6059
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 21.10.16 08:40. Заголовок: Гугл не пробовал спр..


Гугл не пробовал спросить ?
http://www.programmersforum.ru/showthread.php?t=179096

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 7
Зарегистрирован: 04.04.16
ссылка на сообщение  Отправлено: 21.10.16 10:17. Заголовок: Чет не догадался. Сп..


Чет не догадался.
Спасибо.
Вроде тест срабатывает.

msgbox( str(oSheet:Columns("A"):Column)+CRLF+str(oSheet:Columns("AZ"):Column) )

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 8
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет