ПРОГРАММНЫЙ ПРОДУКТ ОЦЕНКИ ЭФФЕКТИВНОСТИ ИСПОЛЬЗОВАНИЯ ИНФОРМАЦИОННО - КОММУНИКАЦИОННЫХ ТЕХНОЛОГИЙ НА
ПРЕДПРИЯТИИ
Подсобляева О.В.
Доцент кафедры программного обеспечения, канд. экон. наук, Орский гуманитарно-технологический институт (филиал) ОГУ, г. Орск
Аннотация
В статье представлен программный продукт, разработанный в табличном процессоре MS Excel 2010 с применением языка программирование VBA, который позволяет определить уровень информатизации на предприятии и создать трехмерную модель оценки эффективности использования информационно - коммуникационных технологий за период. Программный продукт представляет собой книгу MS Excel с поддержкой макросов и не требует подключения специальных модулей и установки приложений.
Ключевые слова: информационно - коммуникационные технологии, эффективность, язык VBA
Keywords: information and communication technology, efficiency, VBA
В масштабах предприятия затраты на информатизацию, как правило, растут в соответствии с реакцией на непрерывное появление на рынке новых, более качественных предложений Методологическая основа для проведения комплексной оценки эффективности информационно-коммуникационных технологий отличается крайне небольшим количеством материала и официально опубликованных методик и схем проведения оценки.
Нами было создано приложение в табличном процессоре MS Excel 2010 с применением языка программирование VBA (Visual Basic for Applications) для расчета эффективности использования информационно - коммуникационных технологий на предприятиях. Программный продукт представляет собой книгу MS Excel с поддержкой макросов и не требует подключения специальных модулей и установки приложений. Книга содержит три листа «Исходные данные», «Расчет весовых коэффициентов», «Модели».
При открытии приложения MS Excel только авторизованный пользователь получает доступ к данным. Для этого предлагается ввести пароль, чтобы снять защиту как с рабочего листа, так и со всей книги в целом.
Для расчета всех необходимых показателей, построения графиков и моделей авторизованному пользователю необходимо внести только значения стоимостных показателей, показателей оснащенности, трудовых показателей. Ячейки для ввода необходимых данных выделены серым цветом и снабжены подсказкой.
•на
к
о
^
И О
я
Стоимостные показатели 2010 2011 2012 2013 максимальное значение показателя минимальное значение показателя Средние значения весовых коэффициентов Дифференцированные значения стоимостных показателей 2010 2011 2012 2013
затраты иа аппаратное обеспечение 0 263БОО 165700 1305100 1305100 О #ДЕЛ/0! затраты на аппаратное обеспечение 0 0,20190024 0,12696345 1
затраты на программное обеспечение 0 1440700 98800 782900 1440700 О #ДЕ/1/0! затраты на программное обеспечение 0 1 0,06857777 0,54342
затраты на комплектующие 9000 14000 НООО 24860 24860 9000 #ДЕЛ/0! затраты на комплектующие 0 0,31525851 0,1261034 1
затраты на техническое и организационное 41ЭОО 3140800 144100 0 3140800 О #ДЕЛ/0! затраты на техническое и организационное сопровождение 0,01334055 1 0,04588003 0
затраты на оплату линий связи 528300 713931 584600 462000 713931 462000 #ДЕЛ/0! затраты на оплату линий связи 0,2631673 1 0,48664118 0
затраты на Интернет 218800 258892 188800 23880-0 258892 188800 #ДЕЛ/0! затраты на Интернет 0,4280089 1 О 0,71335
р
о\ о
л р
о о й
н
&ГН
я о о
а
О) № № о
й р
к
о X о й и
В §
и
й
Показатели 2010 2011 2012 2013
Общее число сотрудников 627 668 892 793
Число сотрудников ИТ - отдела 6 6 7 6
Число ПК 125 133 132 162
Показатели оснащенности 2010 2011 2012 2013 максимальное значение показателя минимальное значение показателя Средние значения весовых коэффициентов Дифференцированные значение показателей оснащенности 2010 2011 2012 2013
Соотношение сотрудников ИТ-отдела к общему числу сотрудников предприятия 0,0096 0,0090 0,0078 0,0076 0,0096 0,0076 #ДЕЛ/0! Соотношение сотрудников ИТ-отдел а к общему числу сотрудников предприятия 1 0,70679424 0,14044181 0
\ » Число персональных ПК на одного сотрудника ИТ-отдела 20,8333 22,1667 18,8571 27,0000 27,0000 18,8571 #ДЕЛ/0! Число персональных ПК на одного сотрудника ИТ - отдела 0,24269006 0,40643275 0 1
Обеспеченность персональными компьютерами на 100 работников 19,9362 19,9102 14,7982 20,4288 20,4288 14,7982 #ДЕЛ/0! Обеспеченность персональными компьютерами на 100 работников 0,91252225 0,90790023 0 1
>
Трудовые показатели 2010 2011 2012 2013 максимальное значение показателя минимальное значение показателя Средние значения весовых коэффициентов Дифференцированные значение трудовых показателей 2010 2011 2012 2013
- Сокращение времени выполнения операций 0 1 1 2 2 0 #ДЕЛ/0! Сокращение времени выполнения операций 0 0,5 0,5 1
Удобное хранение информации 1 2 1 1 2 1 #ДЕЛ/0! Удобное хранение информации 0 1 0 0
Контроль сроков исполнения 0 -1 1 2 2 -1 #ДЕЛ/0! Контроль сроков исполнения 0,33333333 0 0,66666667 1
Повышение квалификации 1 1 1 2 2 1 #ДЕЛ/0! Повышение квалификации 0 0 0 1
Автоматизация обработки по заданному алгоритму 0 1 1 2 2 0 #ДЕЛ/0! Автоматизация обработки по заданному алгоритму 0 0,5 0,5 1
Показатели 2010 2011 2012 2013
График для стоимостных показателей | Стоимостные показатели
График для показателей оснащенности | Показатели оснащенности -1
На рисунке 1 представлен внешний вид рабочего листа приложения. После того, как пользователь введет исходные значения показателей каждой группы, автоматически произойдет расчет дифференцированных значений показателей [1, 87].
Максимальные и минимальные значения каждого показателя группы находятся с помощью встроенных функций табличного процессора MS Excel.
Для вычисления дифференцированных значений показателей была создана пользовательская функция на языке программирования VBA. Программный код функции записан в окне Visual Basic вкладки «Разработчик» (см. рисунок 2).
^ приложение.хкгп - Mcxfulel (Code)
(General)
Function ДифЗнач(тек, мим, макс) ДифЗнач = (тек - мин} / (макс - мин} End Function
Рисунок 2 - Программный код функции ДифЗнач
В результате создания макроса в окне в раздел «Функции определенные пользователем» добавилась функция ДифЗнач (см рисунок 3 и 4).
Мастер функций - шаг 1 из 2
Поиск функции:
□велите краткое описание действияг которое нужно выполнить, и нажмите кнопку Найти"
категория: Определенные пользователем
Выберите функцию:
Рисунок 3 - Окно «Мастер функций»
Рисунок 4 -
Пользовательская функция для расчета дифференцированных значений показателей
ю_Весовые коэффициенты показателей
11 Показатели Экспе рты Средние значения
12 13 первый второй третий четвертый пятый шестой
Стоимостные показатели затраты на аппаратное обеспечение 0,23810 0,19480 0,14286 0,23810 0,23810 0,19480 0,207793333
14 затраты на программное обеспечение 0,28571 0,28571 0,19480 0,14286 0,19480 0,09524 0,199853333
15 затраты на комплектующие 0Д4286 0,09524 0,04762 0,09524 0,04762 0,14286 0,09524
16 затраты на техническое и организационное сопровождение 0,04762 0,04762 0,09524 0,04762 0,14286 0,23810 0,103176667
17 затраты на оплату линий связи 0,09524 0,14286 0,23810 0,28571 0,28571 0,04762 0,18254
18 19 20 затраты на Интернет 0,19480 0,23810 0,28571 0,19480 0,09524 0,28571 0,215726667
Показатели оснащенности Соотношение сотрудников ИТ - отдела к общему числу сотрудников предприятия 0,16667 г 0,50000 0,16667 0,33333 0,33333 0,50000 0,333333333
Число персональных ПК на одного сотрудника ИТ - отдела 0,33333 0,33333 0,33333 0,50000 0,50000 0,33333 0,388888889
21 22 Обеспеченность персональными компьютерами на 100 работников 0,50000 г 0,16667 0,50000 0,16667 0,16667 0,16667 0,277777778
Трудовые показатели Сокращение времени выполнения операций 0,26667 г 0,33333 0,26667 г 0,06667 0,26667 0,26667 0,244444444
23 Удобное хранение информации 0,13333 0,20000 0,20000 ОДЗЗЗЗ 0,20000 0,13333 0,166666667
24 Контроль сроков исполнения 0,06667 одзззз 0,13333 0,26667 ОДЗЗЗЗ 0,06667 0,133333333
25 Повышение квалификации 0,20000 0,06667 0,06667 0,20000 0,06667 0,33333 0,155555556
26 Автоматизация обработки по заданному алгоритму 0,33333 г 0,26667 0,33333 0,33333 0,33333 0,20000 0,3
Рисунок 5 - Заполненная таблица «Весовые коэффициенты показателей»
А В С 0 Е Г С Н 1 J К 1. М
Стоимостные показатели 2010 2011 2012 2013 максимальное значение показателя минимальное значение показателя Средние значения весовых коэффициентов Дифференцированные значения стоимостных показателей 2010 2011 2012 2013
затраты на аппаратное обеспечение 0 263500 165700 1305100 1305100 0 0,207793333 затраты на аппаратное обеспечение 0 0,2019 0,126963 1
затраты на программное обеспечение 0 1440700 98800 782900 1440700 0 0,199853333 затраты на программное обеспечение 0 1 0,068578 0,543416
затраты на комплектующие 9000 14000 11000 24860 24860 9000 0,09524 затраты на комплектующие 0 0,315259 0,126103 1
затраты на техническое и организационное сопровождение 41900 3140800 144100 0 3140800 0 0,103176667 затраты на техническое и организационное сопровождение 0,013341 1 0,04588 0
затраты на оплату линий связи 528300 713931 584600 462000 713931 462000 0,18254 затраты на оплату линий связи 0,263167 1 0,486641 0
затраты на Интернет 218800 258892 188800 238800 258892 188800 0,215726667 затраты на Интернет 0,428009 1 0 0,713348
Показатели 2010 2011 2012 2013
) Общее число сотрудников 627 668 892 793
1 Число сотрудников ИТ - отдела 6 6 7 6
> Число ПК 125 133 132 162
:
Показатели оснащенности ) 2010 2011 2012 2013 максимальное значение показателя минимальное значение показателя Средние значения весовых коэффициентов Дифференцированные значение показателей оснащенности 2010 2011 2012 2013
Соотношение сотрудников ИТ-отдела к общему числу сотрудников > предприятия 0,0096 0,0090 0,0078 0,0076 0,0096 0,0076 0,333333333 Соотношение сотрудников ИТ - отдела к общему числу сотрудников предприятия 1 0,706794 0,140442 0
Число персональных ПК на одного г сотрудника ИТ - отдела 20,8333 22,1667 18,8571 27,0000 27,0000 18,8571 0,388888889 Число персональных ПК на одного сотрудника ИТ - отдела 0,24269 0,406433 0 1
Обеспеченность персональными ) компьютерами на 100 работников 19,9362 19,9102 14,7982 20,4288 20,4288 14,7982 0,277777778 Обеспеченность персональными компьютерами на 100 работников 0,912522 0,9079 0 1
)
Рисунок 6 - Внешний вид листа «Исходные данные» после ввода весовых коэффициентов показателей.
После ввода исходных данных и расчета дифференцированных значений необходимо перейти на лист «Расчет весовых коэффициентов» и заполнить необходимые ячейки.
В верхней части рабочей области рассчитаны весовые коэффициенты по шкале Фишберна [2, 190]. Ячейки со значениями весов 1 - ых показателей также содержат формулы. Пользователю необходимо заполнить таблицу «Весовые коэффициенты показателей» (см. рисунки 5 и 6).
Среднее значение весового коэффициента каждого показателя определяется автоматически и переносится на лист «Исходные данные» (см. рисунок 6).
Для вычисления обобщающего интегрального показателя по каждой группе был написан программный код в окне модуля и создана кнопка, по нажатию на которую происходит заполнение таблицы (см. рисунки 7, 8,9).
Показатели 2010 2011 2012 2013
График для стоимостных показателей Стоимостные показатели
График для показателей оснащенности Показатели оснащенности
График для трудовых показателей Трудоеые показатели
Расчёт
Рисунок 7 - Таблица вычисления обобщающих интегральных показателей до нажатия
кнопки «Расчет»
'f Microsoft Visual Basic for Applications - приложение.х^пп
File Edit View Insert Foimat Debug Run Tools Add-In: Window Help
SB-Я * ^affl ■> P ► и а к ^ i iï X e Lni, Coll
Project - VBAProject
H J J
S
(ПРНЛОЖ!
Microsoft Excel Objet ÉB*1 Лисг1 (Исход î
Лист2 (расчет в Ç) ЛистЗ (ЛистЗ) I® Лист4 (Графики jï*) ЭтаКнига Forms É Э Modules
M Module 1 Module! Module3 Module4 •di Modules Modules Module7 -âi Module8
Properties - ModulèL
Щ; приложениел1ьт - Modulel (Code) | (General)
~r | |ДнфЗнач
¡Function ДифЗнач(тек, мин, макс) ДифЗнач = (тек - мин) / (макс - мин) End Function
Sub Frtml ( )
Cells(33, Cells(33,
10) - Cells(2, 8) * Cells(2, 10) + Cells (3, 8) * Cells(3, 10) ■f Се11з(4, 8) * Cells (4, 10) + Cells (5, 8) * Cells (J
11) = Cells(2, 8) * Cells(2, 11) + Cells (3, 8) * Cells (3, 11) + Cells(4, 8) * Cells (4, 11) + Cells 5, 8) * Cells (J
12) = Cells(2, 8) * Cells(2, 12) + Cells(3, 8) * Cells(3, 12) + Cells(4, 8) * Cells(4, 12) + Cells 5, 8) * Cells (i
13) = Cells(2, 8) * Cells(2, 13) + Cells (3, 8) * Cells(3, 13) + Се11з(4, 8) * Cells (4, 13) + Cells (5, 8) * Cells (J
10) = Cells(16, 8 * Cells(16 10) + Cells(17, 8) * Cells(17, 10) + Cells(18, 8) » Cells(18, 10)
11) = Cells(16, 8 * Cells (16 11) + Cells(17, 8) * Cells (17, 11) + Cells (18, 8} * Cells (18, 11)
12) = Cells(16, 8 * Cells (16 12) + Cells(17, 8) * Cells (17, 12) + Cells(18, 8} * Cells(18, 12)
13) = Cells(16, 8 * Cells(16 13) + Cells(17, 8) * Cells(17, 13) + Cells(18, 8) * Cells(18, 13)
10) = Cells (22, 8 * Cells (22 10) + Cells (23, 8) * Cells(23, 10) + Cells(24, 8} * Cells (24, 10) + Cells (25, 8) *
11) = Cells(22, 8 * Cells (22 11) + Cells(23, 8) * Cells (23, 11) + Cells(24, 8) * Cells(24, 11) + Cells (25, 8) *
12) = Cells (22, 8 * Cells (22 12) + Cells(23, 8) * Cells(23, 12) + Cells(24, 8) * Cells (24, 12) + Cells (25, 8) *
13) = Cells(22, 8 * Cells (22 13) + Cells(23, 8) * Cells(23f 13) + Cells (24, 8} * Cells (24, 13) + Cells (25, 8) *
Рисунок 8 - Программный код для вычисления интегральных показателей
Показатели 2010 2011 2012 2013
График для стоимостных показателей Стоимостные показатели 0,141748 0,773275 0,145553 0,555525
График для показателей оснащенности Показатели оснащенности 0,581191 0,64585 0,045814 0,555557
График для трудовых показателей Трудоеые показатели 0,044444 0,43 ВВВ9 0,351111 0,833333
Расчёт
Рисунок 9 - Таблица вычисления обобщающих интегральных показателей после
нажатия кнопки «Расчет» Помимо расчета показателей приложение позволяет строить графики и модели. Средствами VBA были созданы три макроса для построения графиков и три кнопки по нажатию, на которые автоматически строятся графики (см. рисунок 10, 11, 12).
Рисунок 10 - Окно «Макрос»
Рисунок 11 - Кнопки для построения графиков
Рисунок 12 - Пример графика изменения стоимостных показателей
После ввода и расчета всех необходимых данных, на листе «Модели» происходит автоматическое создание трехмерных моделей оценки эффективности использования информационно - коммуникационных технологий по годам (см. рисунки 13 и 14).
Рисунок 13 - Шаблон построения трехмерной модели
Рисунок 14 - Пример трехмерной модели оценки эффективности использования информационно - коммуникационных технологий
Литература:
1. Богданова, Формирование информационного пространства организации в условиях региональной интеграции: монография / В.С. Богданова, О.В. Пергунова, Е. Е. Сурина. -Орск: Издательство ОГТИ (филиала) ОГУ, 2015. - 159 с.
2. Ермакова, Ж.А. Экономическая эффективность информационно-коммуникационных технологий на промышленных предприятиях: монография / Ж.А. Ермакова, О.В. Пергунова. - Екатеринбург: Институт экономики УрО РАН, 2016. - 206 с.