Форум » [x]Harbour » EXCEL : преобразовать имя столбца в номер ? » Ответить
EXCEL : преобразовать имя столбца в номер ?
Sadstar2016: Сейчас я пользуюсь такой формулой 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. Есть ли у кого нибудь более общий и точный вариант? Может можно через ОЛЕ и ВБА преобразовать?
Ответов - 2
Dima: Гугл не пробовал спросить ? http://www.programmersforum.ru/showthread.php?t=179096
Sadstar2016: Чет не догадался. Спасибо. Вроде тест срабатывает. msgbox( str(oSheet:Columns("A"):Column)+CRLF+str(oSheet:Columns("AZ"):Column) )
полная версия страницы