Преглед садржаја
Стандардна Екцел -ова функција „Колона“ враћа број уместо слова колоне, на пример:
Колона (Е4) - враћа број 5 уместо слова Е
Колона (АД12) враћа број 30 уместо АД.
Следећа функција враћа слово уместо броја колоне. Дакле, у горња два примера имамо слова Е и АД. Рутина ће се вратити празна ако се позива више од једне ћелије:
Функција Алпха_Цолумн (Целл_Адд Ас Ранге) Ас Стринг Дим Но_оф_Ровс Ас Интегер Дим Но_оф_Цолс Ас Интегер Дим Нум_Цолумн Ас Интегер Но_оф_Ровс = Целл_Адд.Ровс.Цоунт Но_оф_Цолс = Целл_Адд.Цолумнс.Цоунт Иф (Но_Цолумн_Цоол "" Екит Фунцтион Енд Иф Нум_Цолумн = Целл_Адд.Цолумн Иф Нум_Цолумн <26 тхен Алпха_Цолумн = Цхр (64 + Нум_Цолумн) Елсе Алпха_Цолумн = Цхр (Инт (Нум_Цолумн / 26) + 64) & Цхр ((Нум_Цолумн Мод 26) + 64) Енд Ако функција Енд