WWW.DISS.SELUK.RU

БЕСПЛАТНАЯ ЭЛЕКТРОННАЯ БИБЛИОТЕКА
(Авторефераты, диссертации, методички, учебные программы, монографии)

 

Лекция 6

1. Автоматизация проектов VBA

Реализации алгоритмов решения задачи табулирования функций с

использованием средств VBA, рассмотренные в предыдущих лекциях, мало

отличаются от реализаций этих же алгоритмов средствами Excel.

Возможности VBA позволяют создавать более эффективные проекты,

благодаря включению в них средств для организации диалога пользователя

с программной реализацией проекта – интерфейса между пользователем

и программой. К таким средствам можно отнести элементы управления, Набор элементов управления, которые могут быть помещены на рабочий лист книги Excel, размещается на панели инструментов (ПИ) "Элементы управления" (ЭУ), которая может быть открыта из меню "Вид" программы Excel при выборе в этом меню команды "Панели инструментов ".

ПИ "ЭУ" разделена на три поля. На первом (верхнем) поле находятся кнопки, обеспечивающие переключение VBA в режим конструктора, открытие окна "Свойства" и открытие окна редактора с исходным текстом модуля активного листа книги.

На втором (нижнем) поле ПИ находятся кнопки, используемые для создания ЭУ на активном листе книги Excel. Это кнопки "Флажок" – CheckBox, "Поле" – TextBox, "Кнопка" – CommandButton, "Переключатель" - OptionButton, "Список" ListBox, "Поле со списком" - ComboBox, "Выключатель" ToggleButton, "Счётчик" - SpinButton, "Полоса прокрутки" ScrollBar, "Надпись" - Label, "Рисунок" - Image.

Кнопка "Другие элементы…", расположенная в третьем разделе ПИ "ЭУ" открывает окно диалога, в котором находится список с большим числом специальных ЭУ. Число таких элементов зависит от выбора, сделанного при установке программ комплекса Microsoft Office (у меня их 202).

При нажатии на любую из кнопок, находящихся во втором или третьем полях ПИ "ЭУ" программа Excel переводится в "Режим конструктора" – режим, обеспечивающий возможность создания на листе книги выбранного Элемента Управления и запись программы, реализующей функции этого ЭУ.

Для проверки работоспособности созданного ЭУ следует нажать кнопку "Выход из режима конструктора". При этом система переводится в режим выполнения. В этом режиме взаимодействие с программами осуществляется на уровне пользователя, т.е. нажатием ЭУ пользователь может запустить программу, соответствующую этому ЭУ, но не может внести какие-либо изменения в её текст.

В инструкции по выполнению лабораторной работы №8 дано описание процесса создания на листах книги Excel кнопок, обеспечивающих переход с одного листа книги на другой. Комментируя эту ЛР, отмечу, что программы, запускаемые при щелчке ЛКМ по кнопке, могут быть реализованы двумя способами. Первый, это включение в процедуру CommandButton_Click() команды Sheets("Имя_листа_книги").Select, а второй – включение команды Worksheets("Имя_листа_книги").Activate.

Процедуры, выполняемые при нажатии командных кнопок, помещаемых на листах книги Excel, позволяют организовать выполнение различных сервисных задач.

В качестве примеров такого рода задач, рассмотрим два примера:

- вывод сведений об авторе, выполненной работы, и - вывод сведений о размерах и распределении памяти, имеющейся на Вашем компьютере.

Пример 1. Создание кнопки для вывода информации "Об авторе" На листе "Оглавление" книги, перейдя предварительно в режим конструктора, создадим командную кнопку. ЩПК по вновь созданной кнопке откроем контекстное меню. Выберем в этом меню строку "Свойства".

В строку "Caption" (Заголовок) этого окна введём текст "Сведения об авторе".

В строку "Name" (Имя) изменим стандартное имя кнопки, присвоенное ей при создании (CommandButtoni), на более информативное CmdAboutAuthor.

Выполнив двойной ЩЛК, перейдём в окно редактора VBA на страницу модуля листа "Оглавление". В поле ввода этого листа появляются две строки заготовки процедуры, которая будет выполняться при нажатии на созданную нами кнопку.

Private Sub cmdAboutAuthor_Click() End Sub Для вывода информации об авторе работы воспользуемся функцией MsgBox, используемой в программах VBA для вывода окон с сообщениями программы. Запишем после заголовка процедуры строку с обращением к функции MsgBox.

MsgBox "Работа выполнена студентом Ивановым И., гр. 1-П-1,. 2007г." _,,"Сведения об авторе" Выйдем из режима конструктора и нажмём кнопку "Сведения об авторе" на листе книги. Результат выполнения этой процедуры показан на рис. 1.

Рис. 1. ДО, выводимое на экран при нажатии кнопки "Сведения об авторе" Синтаксис обращения к функции MsgBox:

MsgBox (prompt[, buttons] [, title] [, helpfile, context]) Синтаксисом функции MsgBox определяются следующие именованные аргументы:

prompt – подсказка. Обязательный аргумент. Строковое выражение, отображаемое сообщением, выводимым в диалоговое окно.

buttons – кнопки. Необязательный аргумент. Числовое выражение сумма, определяемая числом и типом кнопок, отображаемых в ДО MsgBox, типом используемой пиктограммы, идентификацией кнопки, активной по умолчанию и модальностью (the modality) окна. Если этот аргумент опущен, то его значение "по умолчанию" равно 0.

title – заголовок. Необязательный аргумент. Строковое выражение, отображаемое как текст в заголовке окна MsgBox. Если аргумент title опущен, то в заголовке окна MsgBox выводится название приложения.

Аргументы helpfile, context определяются при создании для ДО MsgBox контекстной справки.



Пример 2. Создание кнопки для вывода сведений о распределении памяти На листе "Оглавление" книги, перейдя предварительно в режим конструктора, создадим командную кнопку. ЩПК по вновь созданной кнопке откроем контекстное меню. Выберем в этом меню строку "Свойства".

В строку "Caption" (Заголовок) этого окна введём текст "Сведения о распределении памяти ЭВМ".

В строку "Name" (Имя) изменим стандартное имя кнопки, присвоенное ей при создании (CommandButtoni), на более информативное CmdMemoryDistribution.

Выполним двойной ЩЛК по кнопке, в результате чего перейдём в окно редактора VB, соответствующее модулю листа "Оглавление". В поле окна редактора появится заготовка новой процедуры с кодом За первой строкой этой процедуры введём следующие команды:

Вернёмся на лист "Оглавление", выйдем из режима конструктора и нажмём кнопку "Сведения о распределении памяти ЭВМ". В результате выполнения созданной нами процедуры будет выведено окно сообщения MsgBox:

Рис. 2. Окно MsgBox, с сообщением о распределении памяти ЭВМ Ключевое слово – Application (Приложение), представляет в данном случае приложение Microsoft Excel в целом.

В этом приложении определены Свойства (Properties): MemoryTotal, MemoryUsed и MemoryFree, которые позволяют определить размеры памяти ЭВМ, а также размеры используемой в данный момент памяти и свободной памяти.

Оператор MsgBox обеспечивает обращение к встроенной функции VBA, используемой для вывода диалогового окна с сообщением о размерах полной, использованной и свободной памяти ЭВМ (рис. 1).

Пример 3. Программа табулирования функции, запускаемая при Рассмотрим пример программной реализации алгоритма табулирования разветвляющейся функции, в котором для организации ввода исходных данных используются ЭУ, вызываемые непосредственно на лист книги Excel.

Вставим в книгу Excel новый лист. Переименуем его в "ТабКнопка", а затем, перейдя предварительно в режим конструктора, создадим на нём кнопку.

ЩПК по вновь созданной кнопке откроем контекстное меню. Выберем в этом меню строку "Свойства".

В строку "Caption" (Заголовок) этого окна введём текст "Табулирование функции F(X)".

В строку "Name" (Имя) изменим стандартное имя кнопки, присвоенное ей при создании (CommandButtoni), на более информативное CmdFuncTab.

Выполним двойной ЩЛК по кнопке, в результате чего перейдём в окно редактора VB, соответствующее модулю листа "ТабКнопка". В поле окна редактора появится заготовка новой процедуры с кодом Введём в строки, следующие после заголовка процедуры, тексты комментариев и операторы программы ' Объявление переменных Х Х0, Хк и Dx, определяющих аргумент, ' параметры изменения и шаг изменения аргумента функции ' Объявление переменной sht как объекта Worksheet – рабочий лист ' Объявление переменных, определяющих функцию и её параметры ' Объявление вспомогательных переменных ' Определяем программное имя листа, на котором будут выполняться Set sht = Worksheets("Lection6") Сначала, используя свойство Range для листа sht, очистим диапазон столбцов A:D, а затем, используя это же свойство, заполним ячейки заголовка таблицы Для этого запишем текст инструкции:

' используя метод Clear, очищаем столбцы листа sht sht.Range("A:F").Clear sht.Range("A1").Value = "Автоматизированное заполнение таблицы" sht.Range("A4").Value = "№" sht.Range("b4").Value = "X" sht.Range("c4").Value = "Y" sht.Range("A2").Value = "a=" sht.Range("C2").Value = "b=" sht.Range("A3").Value = "X0=" sht.Range("C3").Value = "Xk=" sht.Range("E3").Value = "Dx=" Метод Clear (Очистить) используется для очистки ячеек в диапазоне Range, определяемом столбцами от A до F.

Свойство Value (Значение) для объекта Worksheet, позволяет определить значения в ячейках таблицы, определяемых свойством Range.

записываются текстовые константы, определяющие имена параметров, которые должны быть введены в соответствующие ячейки для формирования заголовка документа.

Для того, чтобы организовать интерфейс пользователя с программой воспользуемся встроенной функцией VBA MsgBox.

MsgBox("Выполните ввод необходимых исходных данных") При обработке оператора MsgBox открывается окно, в котором выводится информационное сообщение (рис. 3). После нажатия кнопки ОК в ДО MsgBox организуем ввод данных, необходимых для выполнения табулирования функции.

Числовые значения, определяющие диапазон и шаг изменения аргумента, а также параметры табулируемой функции можно ввести, использовав для этого, последовательность обращений к функции VBA InputBox.

Рассмотрим оператор для определения значения Х0.

X0 = Val(InputBox("Введите значение X0","X0","0")) При выполнении этого оператора на рабочее поле, выполняемой программы, выводится ДО InputBox (см. рис. 4).

В рабочее поле ДО выводится подсказка, определяемая значением первого параметра оператора InputBox:

В заголовке ДО отображается значение второго параметра - "X0", а в поле ввода – значение третьего параметра "0" - значение, вводимое "по умолчанию" (см. рис. 4).

Значения параметров вводимых при обращениях к функции InputBox имеют тип string (строка). Для того чтобы в дальнейшем при выполнении программы можно было использовать значения, введённые средствами InputBox, необходимо преобразовать к одному из числовых типов. Так в приведённом выше операторе значение, введённое в поле ввода окна InputBox, должно быть преобразовано к типу переменной Х0 – Double.

Аналогичные операторы записываются для ввода параметров Xk, Dx, a, b.

Xk= Val(InputBox("Введите значение Xk","Xk","1")) Dx = Val(InputBox("Введите значение Dx","Dx","0.1")) a = Val(InputBox("Введите значение a","a","1")) b = Val(InputBox("Введите значение b","b","1")) Для отображения введённых значений параметров в ячейках создаваемой таблицы дополним каждую из вышеприведённых инструкций с обращением к функции InputBox ещё одной инструкцией, записывающей введённое значение в ячейку таблицы. Ниже приводится фрагмент программы, в котором реализованы операции ввода исходных данных и операции записи введённых значений в ячейки таблицы.

X0 = Val(InputBox("Введите значение X0", "X0", "0"))



Похожие работы:

«Prof. Eleonora Pivovarova (IFES RAS) Пивоварова Элеонора Петровна (псевдоним Э. Корбаш), китаеведполитэконом, главный научный сотрудник Института Дальнего Востока РАН, доктор экономических наук, профессор, академик РАЕН. Родилась 10 сентября 1937 г. в Саратовской области у великой русской реки Волги в семье служащих. Отец – Пивоваров Петр Терентьевич (1906–81) - родом из семьи старосты самарской церковной общины, мать - Пивоварова Лидия Николаевна (1910–94) - из потомков сербских переселенцев...»

«ПОЯСНИТЕЛЬНАЯ ЗАПИСКА Цель преподавания дисциплины Интерьер составляет органическую часть архитектуры. Целью преподавания дисциплины Типология проектирования и оборудования жилого интерьера является изучение студентами комплекса знаний по истории архитектуры, архитектурно-пространственным формам, художественным и типологическим основам проектирования жилых и общественных зданий. Данные знания являются базовой основой при разработке интерьеров помещений. Задачи изучения дисциплины В результате...»

«МИНИСТЕРСТВО СЕЛЬСКОГО ХОЗЯЙСТВА РОССИЙСКОЙ ФЕДЕРАЦИИ Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования Саратовский государственный аграрный университет имени Н.И. Вавилова Утверждаю Директор филиала Кучеренко И.А. 30 августа 2013 г. РАБОЧАЯ ПРОГРАММА УЧЕБНОЙ ДИСЦИПЛИНЫ Дисциплина ОСНОВЫ СОЦИОЛОГИИ И ПОЛИТОЛОГИИ Специальность 190631.51 Техническое обслуживание и ремонт автомобильного транспорта Квалификация Техник выпускника Нормативный срок...»

«УТВЕРЖДАЮ Председатель приемной комиссии, ректор НОУ ВПО Самарский институт управления _ Л.Я. Осипова 20г. ПРОГРАММА КОМПЛЕКСНОГО ВСТУПИТЕЛЬНОГО МЕЖДИСЦИПЛИНАРНОГО ЭКЗАМЕНА на 2014 г. при приеме для обучения по программе магистратуры 38.04.03. Управление персоналом по результатам вступительных испытаний, проводимых НОУ ВПО СИУ самостоятельно Вступительное испытание проходит в форме собеседования по экзаменационным билетам. Результат оценивается по 5-и бальной шкале. При проведении...»

«Государственное бюджетное образовательное учреждение высшего профессионального образования Московской области Международный университет природы, общества и человека Дубна (университет Дубна) Институт системного анализа и управления Кафедра системного анализа и управления УТВЕРЖДАЮ проректор по учебной работе С.В. Моржухина __20 г. Программа дисциплины Облачные сервисы в корпоративном управлении (наименование дисциплины) Направление подготовки 230700 Прикладная информатика Магистерская программа...»

«Министерство культуры Российской Федерации федеральное государственное бюджетное образовательное учреждение высшего профессионального образования Новосибирская государственная консерватория (академия) имени М.И.Глинки ОСНОВНАЯ ОБРАЗОВАТЕЛЬНАЯ ПРОГРАММА ВЫСШЕГО ПРОФЕССИОНАЛЬНОГО ОБРАЗОВАНИЯ Направление подготовки 073500 Дирижирование Квалификация (степень) магистр 2 Основная образовательная программа разработана на основании ФГОС ВПО 073500 Дирижирование, Примерной основной образовательной...»

«МИНИСТЕРСТВО СЕЛЬСКОГО ХОЗЯЙСТВА РОССИЙСКОЙ ФЕДЕРАЦИИ Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования КУБАНСКИЙ ГОСУДАРСТВЕННЫЙ АГРАРНЫЙ УНИВЕРСИТЕТ Факультет управления Рабочая программа дисциплины Экономика государственного и муниципального сектора Направление подготовки 081100 Государственное и муниципальное управление Квалификация (степень) выпускника Бакалавр Форма обучения Очная, заочная Краснодар 2013 1. Цели освоения дисциплины Цель...»

«МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ НАЦИОНАЛЬНЫЙ ИССЛЕДОВАТЕЛЬСКИЙ ТОМСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ ФИЛОЛОГИчЕСКИЙ ФАКУЛЬТЕТ ТГУ СОВЕТ МОЛОДЫх УчЕНЫх Традиции и инновации в филологии XXI века: взгляд молодых ученых материалы всероссийской молодежной конференции 23-25 августа 2012 г. ИЗДАТЕЛЬСТВО ТОМСКОГО УНИВЕРСИТЕТА 2012 ББК 81+821.0+655]:001.95 УДК 80+76.17 Т 65 Ответственный редактор: д-р филол. наук, профессор Т.А. Демешкина Издание осуществлено по заказу Министерства...»

«Программирование в Scilab Мишель Боден (Michal Baudin) e Сентябрь 2011 года Аннотация В этом документе мы представляем программирование в Scilab1. В первой части мы представляем управление памятью в Scilab. Во второй части мы представляем различные типы данных и анализируем методы программирования, связанные с теми структурами данных. В третьей части мы представляем характеристики для разработки гибких и устойчивых функций. В последней части мы представляем методы, которые позволяют получить...»

«Федеральное агентство по образованию Томский государственный университет систем управления и радиоэлектроники Кафедра сверхвысокочастотной и квантовой радиотехники УТВЕРЖДАЮ Проректор по УР М.Т.Решетников _2007г. РАБОЧАЯ ПРОГРАММА По курсу РАДИООПТОЭЛЕКТРОННЫЕ СЕТИ И УСТРОЙСТВА Для специальности 210302 - Радиотехника Факультет - радиотехнический. Профилирующая кафедра - Радиоэлектроники и защиты информации (РЗИ) Курс - пятый. Семестр - Учебный план набора - 2005 г. и последующих лет....»

«АННОТАЦИЯ к рабочей программе учебной дисциплины ОД.Б.07.БИОЛОГИЯ цикла общеобразовательных дисциплин основной профессиональной образовательной программы Рабочая программа учебной дисциплины является частью основной профессиональной образовательной программы ФБОУ ВПО ВГАВТ по специальности СПО 190631 Техническое обслуживание и ремонт автомобильного транспорта, разработанной в соответствии с ФГОС СПО утвержденным приказом Министерства образования и науки РФ от 17.03.2010 № 184 и приказа № 1089...»

«РАБОЧАЯ ПРОГРАММА ДИСЦИПЛИНЫ Моделирование систем и процессов (ЕН.Ф.06) (наименование, шифр по ГОС) 160900 – Эксплуатация и испытания авиационной и Направление космической техники (бакалавры) (шифр по ГОС) Механический Факультет Кафедра Аэродинамики, конструкции и прочности летательных аппаратов дневная III, Форма обучения. Курс 180 часов Общий объем учебных часов на дисциплину Аудиторные занятия – 100 часов, в том числе: 72 часа Лекции 8 часов Практические занятия 20 часов Лабораторные...»

«МИНИСТЕРСТВО ОБРАЗОВАНИЯ РЕСПУБЛИКИ БЕЛАРУСЬ РЕСПУБЛИКАНСКИЙ ИНСТИТУТ ПРОФЕССИОНАЛЬНОГО ОБРАЗОВАНИЯ УТВЕРЖДАЮ Начальник управления профессионально-технического образования Министерства образования Республики Беларусь Э. Н. Гончар “”_ 2001 г. МАТЕРИАЛОВЕДЕНИЕ Типовая учебная программа для профессионально-технических учебных заведений Т 02.01.00 Литейное производство Учебные Т 03.01.00 Механическая обработка металлов на специальности: станках и линиях Т 03.02.00 Обслуживание и ремонт оборудования...»

«Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования Саратовская государственная юридическая академия УТВЕРЖДАЮ Первый проректор, проректор по учебной работе С.Н. Туманов __2012 г. УЧЕБНО-МЕТОДИЧЕСКИЙ КОМПЛЕКС ДИСЦИПЛИНЫ Теоретико-методологические основы административного права Направление подготовки 030900.68 юриспруденция (квалификация (степень) магистр) Разработчик: к.ю.н., доцент Петров М.П. Саратов УМК обсуждён на заседании кафедры...»

«УТВЕРЖДАЮ Проректор по научной работе ГБОУ ВПО Саратовский ГМУ им. В.И. Разумовского Минздравсоцразвития России Ю.В. Черненков 20 г. Программа кандидатского экзамена по специальности 14.03.02-Патологическая анатомия 1 Программа кандидатского экзамена разработана в соответствии с Приказом Министерства образования и науки РФ от 16 марта 2011г. №1365 Об утверждении федеральных государственных требований к структуре основной профессиональной образовательной программы послевузовского...»

«Министерство образования Республики Беларусь Учебно-методическое объединение высших учебных заведений Республики Беларусь по гуманитарному образованию УТВЕРЖДАЮ Первый заместитель Министра образования Республики Беларусь А.И. Жук _ 2009 г. Регистрационный № ТД-/тип. Основы информационных технологий Типовая учебная программа для высших учебных заведений по специальностям 1-24 01 02 Правоведение, 1-24 01 03 Экономическое право, 1-23 01 06 Политология (по направлениям) Председатель...»

«МИНИСТЕРСТВО СЕЛЬСКОГО ХОЗЯЙСТВА РОССИЙСКОЙ ФЕДЕРАЦИИ Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования Саратовский государственный аграрный университет имени Н.И. Вавилова СОГЛАСОВАНО УТВЕРЖДАЮ Заведующий кафедрой Декан факультета _ /Молчанов В.А./ /Васильев А.А./ 30 августа 2013 г. 30 августа 2013 г. РАБОЧАЯ ПРОГРАММА ДИСЦИПЛИНЫ (МОДУЛЯ) ОСНОВЫ НАУЧНОДисциплина ИССЛЕДОВАТЕЛЬСКОЙ РАБОТЫ Направление подготовки 111100.62 Зоотехния Профиль...»

«Учреждение образования Международный государственный экологический университет имени А.Д. Сахарова УТВЕРЖДАЮ Проректор по учебной работе МГЭУ им. А.Д. Сахарова О.И. Родькин 2013 Регистрационный № УД -_/р. ЭКОЛОГИЧЕСКАЯ БЕЗОПАСНОСТЬ Учебная программа учреждения высшего образования по учебной дисциплине для специальности 1-33 01 01 Биоэкология Факультет экологической медицины Кафедра биологии человека и экологии Курс Семестр Лекции 26 часов Экзамен семестр Практические (семинарские) занятия...»

«1 I. Пояснительная записка Рабочая программа дисциплины разработана в соответствии с Федеральным государственным образовательным стандартом (ФГОС) высшего профессионального образования по направлению подготовки (специальности) 060105 Медико-профилактическое дело (квалификация (степень) специалист), с учётом рекомендаций примерной основной образовательной программы высшего профессионального образования по направлению подготовки (специальности) 060105 Медикопрофилактическое дело и примерной...»

«Институт инноватики ii.spb.ru МИНИСТЕРСТВО ОБРАЗОВАНИЯ РОССИЙСКОЙ ФЕДЕРАЦИИ УТВЕРЖДАЮ Руководитель Департамента содержания высшего профессионального образования Л.В. Попов 2004 г. ПРИМЕРНАЯ ПРОГРАММА ДИСЦИПЛИНЫ Инфраструктура нововведений Рекомендуется Министерством образования России для специальности 073500 – Управление инновациями направления подготовки дипломированных специалистов 658200 – Инноватика Санкт-Петербург Институт инноватики ii.spb.ru Программа дисциплины “Инфраструктура...»






 
2014 www.av.disus.ru - «Бесплатная электронная библиотека - Авторефераты, Диссертации, Монографии, Программы»

Материалы этого сайта размещены для ознакомления, все права принадлежат их авторам.
Если Вы не согласны с тем, что Ваш материал размещён на этом сайте, пожалуйста, напишите нам, мы в течении 1-2 рабочих дней удалим его.