Операционная система Windows


 

Меню

Реклама


АВТОМАТИЗАЦЯ КОНТРОЛЯ Вдвiдування СТУДЕНТАМИ Занять

1.1. Описание программных средств, использованных в экзаменационной работе.

Для выполнения данной экзаменационной работы было использовано программное средство Microsoft Excel из пакета офисных программ Microsoft Office.

Рабочая область

Общий вид программного средства "Microsoft Excel"


Как и любая Windows – программа, Microsoft Excel содержит ряд типичных элементов. Строка заглавия верхняя строка окна содержит название программы "Microsoft Excel", а также название книги, с которой работают в данный момент. Крайняя левая кнопка является кнопкой вызова системного меню, с помощью которого можно руководить размерами и положением программы, а также закрывать ее. Справа размещенные соответственно кнопка свертывания, возобновления и закрытия программы.

Строка меню

Строка меню обычно размещается под окном заглавию и включает такие пункты:

· "Файл" - робота с файлами книг создания, сохранения, открытия файлов, печатания файлов книг;

· "Правка" – вмещает команды работы с книгой, поиска и замены;

· "Вид" – позволяет изменить способ отображения книги на экране звичайний/розмитка страницы, а также задать панели инструментов, которые будут отображены, и изменить масштаб;

· "Вставка" - вставка в книги новых писем, рисунков, диаграмм и других типов данных;

· "Формат" – позволяет изменить формат амбарчика, строки / колонки или целого письма, управления стилями;

· "Сервис" – сервисные функции проверка орфографии, настройка автозамены, установления защиты, на письмо или целую книгу, работа с макросами та настройка параметров Excel;

· "Дани" – работа с базами данных сортировки, фильтр и ин.;

· "Викно" – работа с окнами книг;

· "Справка" – вызов справочной информации.

Панель инструментов «Стандартнаная»


- Создание нового файла на основе активного шаблона. Файлсоздать /ctrl + N/

- Открытие или поиск файл Файлоткрыть /ctrl + O/

- Сохранение текущего файла без изменения его названия, формата и места расположения Файлсохранить /ctrl + S/

- Печать текущего файла или выделенного элемента Файлпечать /ctrl+p/

- Предыдущий пересмотр документа в том виде, в котором он будет напечатан Файлпредварительный просмотр

- Проверка орфографии в текущем файле, документе, книге или сообщении Сервисорфография /f7/

- Исключение выделенного фрагмента из текущего документа и вставка его в буфер обмена Правкавырезать /ctrl + X/

- Копирование выделенного фрагмента в буфер обмена Правкакопировать /ctrl + С/

- Вставка фрагмента из буферу обмена в текущую позицию с заменой выделенного фрагмента текста. Команда доступна только в том случае, когда буфер обмена содержит будь – какие данные. Правкавставить /ctrl + V/

- Копирование форматирования выделенного объекта или текста. Это форматирование будет потом присвоено объекту или тексту, который будет выбран следующим. Если форматирование необходимо присвоить нескольким объектам то сначала выделяют объект, формат которого будут копировать, после этого нажимают эту клавишу дважды и последовательно выделяют те объекты, которым необходимо присвоить новое форматирование. После этого повторно нажимают эту клавишу для выхода из режима формат по образцу

- Склонение последней выполненной команды или исключения последнего введенного фрагменту. Для склонения нескольких последних команд нужно нажать стрелку и выбрать действия, которые необходимо отменить. Если отменить последнее действие невозможно, то название этой команды меняется на нельзя отменить. Правкаотменить /ctrl+z/

- Склонение действия последнего действия клавиши отменить. Как и в предыдущем случае есть возможность вернуться на несколько шагов. Правкавернуть /ctrl+y/

- Вставка или редактирование заданной гиперссилки Вставкагиперссылка /ctrl+k/

- Отображает / прячет панель Web

- Автоматически добавляет функцию нахождения суммы сумм в Microsoft Excel. Диапазон амбарчиков, которые добавляются будет избрано автоматически. Чтобы выбрать диапазон самостоятельно необходимо провести через него мышь с нажатой клавишей, а затем нажать клавишу enter.

- Вывод списка функций и их прототипов с возможностью задавать значение аргументов. Вставкафункция

- Сортировка выбранных элементов в порядке от начала алфавита к его концу, от меньших чисел к большим и от более ранних дат к более поздним по колонке, в которой находится курсор. Если к этому были установлены другие параметры сортировки, то они хранят свое действие.

- Сортировка выбранных элементов в порядке от конца алфавита к его началу, от больших чисел к более малым и от поздних дат к более ранним по колонке, в которой находится курсор. Если к этому были установлены другие параметры сортировки, то они хранят свое действие.

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

Создание карты на основе выделенных данных. Данные должны вмещать ссилки на географические названия, например названия стран или регионов. Вставкакарта

Выводит панель Wordart для создания текстового эффекта.

- Ввод масштаба от 10 до 200% для увеличения или уменьшения изображения активного документа на экране. Видмасштаб

- Клавиша вызова помощника.

Панель инструментов « Форматирование »


- Изменение шрифта выделенного текста. Шрифт может быть изменен в поле шрифт.

- Изменение размера шрифта выделенного текста. В поле размер шрифта необходимо ввести новое значение размера шрифта. Набор доступных размеров зависит от выбранного шрифта и текущего принтера.

- Оформление выделенного текста напивжирним шрифтом. Если выделен текст уже есть напивжирний то эта клавиша снимет этот режим.

- Оформление выделенного текста Курсивом. Если выделен текст уже есть Курсив то эта клавиша снимет этот режим.

- Оформление выделенного текста Пидкресленням. Если выделен текст уже есть Подчеркнут то эта клавиша снимет этот режим.

- Выравнивание выделенного текста, чисел и вложенных объектов, по левому краю с неравным правым.

- Выравнивание выделенного текста, чисел и вложенных объектов, по центру.

- Выравнивание выделенного текста, чисел и вложенных объектов, по правому краю с неравным левым.

- Объединение нескольких выделенных амбарчиков в одну. Этот амбарчик будет содержать данные только из левого верхнего амбарчика, размещенные по центре объединенного амбарчика. Ссылаться на этот амбарчик нужно по адресу левого верхнего амбарчика группы.

- Форматирование выделенных амбарчиков в мижнародному денежному формати в соответствии с настройками Windows в панели управление.

- Установка процентного формата для выделенных комирок

- Установка формата с разделителем для выделенных комирок

- Увеличение числа дробных знаков для выделенных комирок

- Уменьшение числа дробных знаков для выделенных комирок

- додае граници к выделенному амбарчику или диапазону

- Уменьшение отступления выделенного амбарчика приблизительно на ширину символа стандартного шрифта

- Увеличение отступления выделенного амбарчика приблизительно на ширину символа стандартного шрифта

- Форматирование выделенного текста заданным колером


" Строка формул"

- В данном поле можно задать назову для текущего амбарчика или группы амбарчиков и в дальнейшем обращаться к ней можно будет за этим именем.

Следующие 3 клавиши используются для вводу формул:

- Выйти из режима редактирования формул без запоминания змин

- Запомнить изменения в формуле и выйти из режима редагування

- Используется для входа в режим редактирования формул

- - Собственно, строка формул

Робота с базами данных в excel

Рабочую книгу Microsoft Excel можно рассматривать как базу данных. Каждую колонку тогда рассматривают как полет, а каждая строка – как одна запись в базе данных. Поскольку в базах данных каждое поле имеет свое название, тип, ширину и другие параметры, то аналогично нужно установить эти параметры и для каждой колонки базы данных.


Как видно из вышеприведенной базы данных по сотрудникам она имеет такие поля: Код сотрудника, Фамилия, Имя, Должность, Дата найма, Адрес, Город, Домашний телефон . В данную базу данных в настоящий момент введено 9 записей.

Общие рекомендации

По работе с базами данных в excel.

В Microsoft Excel есть набор функций, которые облегчают обработку и анализ баз данных. Для использования этих функций необходимо вводить данные в список в соответствии с приведенными ниже рекомендациями.

Организация списку

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

Размещайте подобные объекты в одну колонку. Спроектируйте список таким образом, чтобы все строки вмещали похожие объекты в одной колонке.

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

Располагайте важные данные сверху или снизу от списка. Избегайте размещения важных данных слева или дело от списка; данные могут быть спрятаны при фильтрации списка.

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

Формат списка

Использования форматированных заглавий колонок. Создавайте заглавия колонок в первой строке списка. Excel использует заглавия при создании отчетов, поиска, и оформлении данных. Шрифт, выравнивание, формат, шаблон, границя и формат букв, которые присвоены заглавиям колонок списка, должны отличаться от формата, присвоенного строкам данных. Перед вводом заглавий колонок амбарчикам должен быть присвоен текстовый формат.

Использования граници амбарчиков. Для отделения заглавий от данных нужно использовать граници амбарчиков, а не пустые строки или пунктирные линии.

Отсутствие пустых строк и колонок. В самом списке не должно быть пустых строк и колонок. Это облегчает идентификацию и выделение списка.

Отсутствие начальных и конечных пробилив. Дополнительные пробили в начале и в конце амбарчика влияют на поиск и сортировку. Вместо вводу пробилив рекомендуется использовать сдвиг текста внутри амбарчика.

Ввод данных в базу данных с помощью форми


Режим вводу данных в базу данных с помощью формы включается командой Данные= Форма. при успешном выполнении данной команды на экране появится окно, похоже на изображенное ниже. В противном случае появится окно с сообщением о том, что Excel не может найти данные. В этом случае необходимо поместить табличный курсор на любую запись в базе данных.

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

Клавиши Добавить и Удалить служат для вставки/исключения записей из базы данных. При вставке записи он появится в конце базы данных, а при исключении – изымается текущая запись. При исключении будет выдано окно подтверждения действия по сообщение о том, что возобновить данную запись после исключения будет невозможно.

Клавиша Вернуть предназначена для того случая, когда изменения сделаны в текущей записи, которая отображается на экране не нужно хранить. Следует отметить что эта команда не возобновит запись, которая была изъята командой Удалить. Клавиши Назад и Далее служат для перемещения по записям базы данных назад\вперед.

Клавиша Критерии позволяет найти записи по заданным условиям. При нажатии клавиши Критерии номер записи в правом верхнем кути формы меняется на надпись Критерии. В полях, размещенных в левой части формы, необходимо ввести одно или несколько значений, которые будут использоваться в качестве условий, Потом нажмите кнопку Далее или Назад.

Клавиша Закрыть закрывает форму. Для записи введенных записей необходимо сохранить книгу.

Сортировки базы даних

Для сортировки базы данных необходимо выбрать команду Данные=сортировка. Как и в предыдущем случае, табличный курсор необходимо установить на любую запись в базе данных иначе будет выдано сообщение о том, что список не найден. Если перед выбором данной команды был выделен диапазон то сортироваться будет именно он. В противном случае Excel сам выделит целую базу данных. Не рекомендуется сортировать часть полей когда выделены не целые записи а только отдельные поля из них, потому что это приведет к тому, что будут просортовани только отдельные поля базы данных без коррекции остальных полей.


На экран будет выведена форма, которая изображена ниже:

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

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

При сортировке баз данных установите переключатель Идентифицировать поля по подписям, чтобы исключить первую строку с названиями колонок из списка и работать с полями по их названиям.

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

Клавиша Параметры викликае диалоговое окно Параметры сортировки:


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

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

Также в этом окне можно изменить объекты сортировки – строки или столбцы. Для сортировки базы данных необходимо выбрать Сроки диапазона .

Использования автофильтра

Команда « Автофильтр» является наиболее быстрым способом выбрать и вывести на экран только необходимые даны. Для включения режиму Автофильтр необхидно установить табличный курсор Excel на любую запись в базе данных и выбрать команду Данные =Фильтр =Автофильтр.

Фильтры могут быть использованы только для одного списка на письме, потому не рекомендуется записывать на одних листьях несколько баз данных.


Если перед выбором команды Автофильтр не была выбрана запись базы данных и экран будет выдано следующее сообщение:


В случае успешного выполнения команды Автофильтр справа от названий полей появятся стрелки автофильтра.

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

Условия отбора автофильтра

Необходимо:

Дии

Все строки списку

Все

Задано число строк с максимальными или минимальными значениями амбарчиков текущей колонки

Первые 10

Строки, которые удовлетворяют два условия, одну ли с оператором сравнения, отличающимся от И оператор по замовчуванню

Условие

Все строки, которые имеют пустые амбарчики в текущей колонци

Пустые

Все строки, которые имеют не пустые амбарчики в текущей колонци

Непустые

Примитка. Условия Пустые и Непустые можно использовать только тогда, когда в колонке содержатся пустые амбарчики.

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


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

Исключения фильтра из списка.

, Чтобы изъять фильтр для одной колонки списка, нажмите клавишу со стрелкой в заглавии нужной колонки а затем выберите Все.

, Чтобы изъять фильтры для всех колонок списка нужно выбрать пункт Фильтр в меню Данные, а затем — команду Показать все.

Для исключения автофильтра из списка, нужно выбрать пункт Фильтр в меню Данные, а затем — команду Автофильтр.

Фильтрация списка из

Помощью расширенного фильтра

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

1. Выделите заглавия колонок, которые фильтруются и нажмите кнопку Копировать.

2. Выделите первую пустую строку диапазона условий отбора и нажмите кнопку Вставить.

3. Введите в строки под заглавиями условий нужны критерии отбора. Убедитесь, что между значениями условий и списком находится как минимум одна пустая строка.

4. Укажите амбарчик в списке.


5. В меню Данные выберите команду Фильтр, а потим— команду Расширенный фильтр.

6. Чтобы показать результат фильтрации, спрятав ненужные строки, установите переключатель « Обработка» в положение Фильтровать список на месте.

, Чтобы скопировать отфильтрованные строки в другую область письма, установите переключатель « Обработка» в положение Скопировать результаты в другое место, перейдите в поле Поместить результат в диапазон, а затем укажите верхний левый амбарчик области вставки.

7. Введите в поле Диапазон условий ссилку на диапазон условий отбора, который включает заглавия колонок.

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

Поради

Если присвоить диапазону имя Критерии, то ссилка на диапазон будет автоматически появляться в поле Диапазон условий. Можно также присвоить имя База_данных для диапазона фильтруемих данных и имя Извлечь для области вставки результатов, и ссилки на эти диапазоны будут появляться автоматически в полях Исходный диапазон и Поместить результат в диапазон соответственно.

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

1.2. Описание необходимого аппаратного обеспечения.

Для выполнения данной экзаменационной работы был использован компьютер следующей конфигурации:
· Центральный процессор – AMD K6 с тактовой частотой 233 Mhz
· Оперативная память - 32 Мбайт
· Жесткий диск - 2,1 Гбайт
· SVGA – видеоадаптер – S3 Trio 64 – 2 Мбайт
Для работы программного средства систематизации данных посещения студентами занятий достаточно любого компьютера, который имеет установленный пакет офисных программ Microsoft Office.

2. розробка автоматизированного программного средства.

2.1. Постановка задачи

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

Общие видомости

Программа создана в Microsoft Excel и предназначена для обобщения данных по посещению студентами занятий.

Особенности программы:

· Распределение студентов на группы;

· Сохранение данных по каждому месяцу и каждой группе на отдельном письме;

· Автоматическое создание пустых баз данных;

· Централизован ввод данных;

· Контроль введенных данных на наличие ошибок;

· Подол на пропуски с уважительными причинами и без них;

· Создание отчета по посещению по определенным группам и месяцам;

· Возможность указать границю допустимого количества пропусков;

· Создание возведенного отчета по группам;

· Автоматическое создание диаграммы;

Основные приемы работы с программой.

Рабочая книга складывается таких писем:

Основные письма

· Письмо "Списки" – ввод списков групп и студентов, что в них учатся;

· Письмо "Ввод" – предназначенный для вводу данных посещения;

· Письмо "Отчет" – формирование отчета а также диаграммы посещения;

Дополнительные письма содержат данные посещения по конкретной группе за отдельный месяц. Также могут быть письма с диаграммами посещения.

Ввод списков учеников.

Список учеников вводится в письме "Списки".


В первой строке содержится заглавие "Списки групп". Слева от него в амбарчике указано общее количество групп, которое введено. Она обновляется при нажатии клавиши "Ок" в левом верхнем кутье.

Третья строка предназначена для вводу номеров групп.

Требования к номерам групп:

· Должен содержать только цифры;

· Если введены больше трех символов, то к вниманию будут браться только первые три;

· Если введены менее трех символов, то слева к ним будут дописаны нули так.

Рекомендуется первой цифрой ставить номер курса, поскольку при нажатии клавиши "Ок" группы будут просортовани в порядке роста номеров, который облегчает поиск. Максимальное количество групп – 254.

Под номером группы вводят список студентов, которые учатся в ней. Не нужно изменять ширину колонок, это будет сделано автоматически при нажатии клавиши "Ок".

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

После введения всех данных нужно нажать клавишу "Ок" в левом верхнем кутье. Ее действие:

1. Пересмотр и исправление номеров групп;

2. Сортировка списков по номеру группы;

3. Подбор ширины амбарчиков таким образом, чтобы фамилии полностью вмещались в них;

4. Обновление информации при списки групп в элементах выбора на других письмах.


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

Данные посещения вводятся в письме "Ввод".

Порядок вводу данных:

1. В поле Група выбрать нужную групу

2. В поле Мисяць выбрать необходимый мисяць

3. Нажать клавишу Вивести. После этого поля Группа и Луна та клавиша Вывести стане недоступной вплоть до сохранения или очистки данных. Если письмо с данными посещения для избранного месяца и группы не существовало, то он создается и ему присваивается имя что состоит из порядкового номера месяца и номера группы. Например, письмо с данными посещения группы 327 за декабря будет называться "12-327". Если же письмо существовало, то данные из него будут выведены в текущее письмо.

4. Ввести данные в нужные амбарчики:

A. пропуск без уважительной причины – символ "б" или "Б"

B. пропуск по уважительной причине – символ "п" или "Б"

5.


Сохранить данные, нажав клавишу Зберегти. После этого данные из письма запишутся на свое письмо. Если письмо содержит ошибки, то на экран будет выдано следующее сообщение.

Сохранить данные не удастся пока все ошибки не будут исправлены. Об ошибке сигнализирует колонка Контроль. Напроти строки, которая содержит неверные данные в колонке Контроль з’явиться слово Помилка. Ошибкой считается ввод символов отличающихся от "б", "Б", "п", "П", а также ввод будь - каких символов в область без фамилии.


Иногда возникает потребность очистить данные и не хранить их. Для такого случая предназначена клавиша Очистить. Перед очисткой на экран будет выдано окно подтверждения действия, поскольку отменить очистку невозможно.

Создания отчетов и диаграмм.

За создание отчетов и диаграмм отвечает лист "Звит"

Для создания отчета нужно:

1. Выбрать способ сортировки элементов списка: По мисяцях или По групах. При этом обновится список имеющихся данных.

2. В списке выделить те данные, по которых необходимо создать отчет.

3. Задать максимальное количество разрешенных пропусков по уважительной причине и без уважительной причины в поле Разрешено количество пропускив.

4.

Нажать клавишу Створити. При этом создастся отчет, в который будут включены те студенты, количество пропусков занятий которых превышает указанное количество а в конце – возведен отчет посещения. Если создается отчет по посещению больше чем 2 месяца/группы, то автоматически будет создано и диаграмму посещения, которое разместится на отдельном письме.


Созданную диаграмму при необходимости можно откорректировать и распечатать. Не следует хранить диаграмму в файле, поскольку это увеличивает его размер, а при создании нового отчета данные в диаграмме будут обезображены. Кроме того, диаграмму можно в любой момент создать заново.

Описание функций microsoft excel,

Использованных в работе.

1. Функция Если

Возвращает одно значение, если задано условие при вычислении дает значение ИСТИНА, и второе значение, если ЛОЖЬ.

Функция ЕСЛИ используется при проверке условий для значений и формул.

Синтаксис

Еслилогичний_вираз; значення_якщо_истина; значення_якщо_ложь

Логичний_вираз— это любое значение или выражение, которое принимает значение ИСТИНА или ЛОЖЬ.

Значення_якщо_истина — это значение, которое возвращается, если логичний_вираз равняется ИСТИНА.

Значення_якщо_ложь — это значение, которое возвращается, если логичний_вираз равняется ЛОЖЬ.

2. Функция Просмотр

Синтаксис

ПРОСМОТРИскомое_значение;Просматриваемый_вектор; вектор_результатов

Искомое_значение - это значение, какое ПРОСМОТР ищет в первом векторе. Искомое_значение может быть числом, текстом, логическим значением, именем, или ссилкой на значение.

Просматриваемый_вектор - это интервал, который содержит только одну строку или одну колонку. Значениями в аргументе просматриваемый_вектор могут быть текстами, числами или логическими значениями.

Важливо! Значения в аргументе просматриваемый_вектор должны быть размещены в порядке роста..., -2, -1, 0, 1, 2..., A-Z, ЛОЖЬ, ИСТИНА; в противном случае функция ПРОСМОТР может повернуть неверный результат. Тексты в нижнем и верхнем регистре считаются эквивалентными.

Вектор_результатов - это интервал, который содержит только одну строку или одну колонку. Он должен быть такого же размера как и просматриваемый_вектор.

    Если ПРОСМОТР не может найти искомое_значение, то подходящим считается наибольшее значение в аргументе просматриваемый_вектор, которое меньше, чем искомое_значение. Если искомое_значение меньше, чем наименьшее значение в аргументе просматриваемый_вектор, то функция ПРОСМОТР возвращает значение ошибки #н/д.

3. Функция Счетесли

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

Синтаксис

Счетеслидиапазон;Критерий

Диапазон— это диапазон, в котором нужно посчитать амбарчики.

Критерий— это критерий в форме числа, выражения или текста, который определяет, какие амбарчики нужно подсчитать.

4. Функция Сумм

Добавляет все числа в интервале амбарчиков.

Синтаксис

Суммчисло1;число2;...

Число1, число2... - это от 1 до 30 аргументов, для которых нужно определить итог или сумму.

    Учитывает числа, логические значения и текстовые представления чисел, которые непосредственно введены в список аргументов. Если аргумент является массивом или ссилкой, то только числа учитываются в массиве или ссилци. Пустые амбарчики, логические значения, тексты и значения ошибок, в массиве или ссилци игнорируются. Аргументы, которые являются значениями ошибок или текстами что не превращаются в числа вызывают ошибку.

5. Функция Счетз

Подсчитывает количество не пустых значений в списке аргументов. Функция СЧЕТЗ используется для подсчета количества амбарчиков с данными в интервале или массиве.

Синтаксис

Счетззначение1; значение2;...

Значение1, значение2... – это от 1 до 30 аргументов, количество которых нужно подсчитать. В данном случае значениями считается значение дорогого типа, включая пустую строку, но не включая пустые амбарчики. Если аргументом является массив или ссилка, то пустые амбарчики в массиве или ссилци игнорируются.

макрос клавиши "Ок" на листе "Списки"
Реакция программы на нажатие клавиши "Ok":
· Пересмотр амбарчиков в диапазоне С3:iv3 и исправление в них номеров групп контроль за их довжиною
· Сортировка списков студентов по номеру групи
· Подбор ширины колонок со списками груп
· Установка списка выбора номеров групп в Combobox1 на листе «Ввид»
Private Sub Commandbutton1_click

For Each w In Rangec3:iv3

If w. Value Then

w. Value = Midw. Value, 1, 3

If Lenw. Value 3 Then w. Value = String3 - Lenw. Value, 0 + Midstrw. Value, 2

End If

Next

Rangec3:iv100.Sort Key1:=rangec3, Order1:=xlascending, Header:=xlguess, _

Ordercustom:=1, Matchcase:=false, Orientation:=xllefttoright

Rangec3:iv3.Copy

Rangea4.PasteSpecial Paste:=xlvalues, Operation:=xlnone, Skipblanks:= _

False, Transpose:=true

Лист1.ComboBox1.ListFillRange = Списки! A4:a + Midstrrangee1.Value + 3, 2

Columnsc:iv.Columns. Autofit

End Sub

Макрос клавиши "Вывести" на листе "Ввид"

Реакция программы на нажатие клавиши "Вывести":
· Пересмотр названий всех писем в книге с целью установления наличия выбранного листа
· В случае отсутствия выбранного письма выполняется его автоматическое створення
O Создания заглавия таблици
O Выбор колеру
O Подбор ширины комирок
O Запись формул в лист
· Копирование данных из заданного письма на письмо "Ввод" и включение вывода списка студентов на листи
· Отключение элементов выбора группы и месяца, отключения клавиши, "Вывести", включение клавиш "Очистить" и "Зберегти"

Private Sub Commandbutton1_click

Found = False

Find = Rangea3.Value2 + - + Rangea2.Value2

For Each Wh In Worksheets

If Wh. Name = Find Then Found = True

Next

If Found = False Then

' СОЗДАНИЕ НОВОГО Листа

Sheets. Add after:=sheetssheets. Count

Activesheet. Name = Find

Sheetsввид.Activate

Sheetsfind.Rows1:2.Font. Bold = True

'№ п/п

Sheetsfind.RangeA2.FormulaR1C1 = № п/п

Sheetsfind.ColumnsA:A.HorizontalAlignment = xlcenter

Sheetsfind.RangeA3.FormulaR1C1 = _

=IFORRC[1]=,RC[1]=ВСЬОГО,,IFR[-1]C=№ п/п,1,r[-1]C+1

Sheetsfind.RangeA3.AutoFill Destination:=sheetsfind.RangeA3:A50, Type:=xlfilldefault

Sheetsfind.ColumnsA:A.ColumnWidth = 6

'призвище

Sheetsfind.RangeB2.FormulaR1C1 = Призвище

Sheetsfind.ColumnsB:B.ColumnWidth = 15

Sheetsfind.RangeB3.FormulaR1C1 = _

=IFLOOKUP + Лист1.RangeA2 +,Списки! R3c3:r3c256, Списки! R[1]C[1]:R[1]C[254]=0,IFANDR[-1]Cвсего,r[-1]C,всего,,lookup + Лист1.RangeA2 +,Списки! R3c3:r3c256,списки! R[1]C[1]:R[1]C[254]

Sheetsfind.RangeB3.AutoFill Destination:=sheetsfind.RangeB3:B50, Type:=xlfilldefault

'дни

Sheetsfind.RangeC2.Value = 1

Sheetsfind.RangeC2.AutoFill Destination:=sheetsfind.RangeC2:AG2, Type:= _

xlfillseries

Sheetsfind.ColumnsC:AG.ColumnWidth = 2

'название мисяця

Sheetsfind.RangeC1:AG1.Merge

Sheetsfind.RangeC1:AG1.HorizontalAlignment = xlcenter

Sheetsfind.RangeC1.Value = Лист1.RangeA4.Value

'група

Sheetsfind.RangeB1.Value = Группа № + Rangea2.Value

'Колир

Sheetsfind.RangeA1:AI2,A:A.Interior. Colorindex = 4

Sheetsfind.RangeA1:AI2,A:A.Interior. Pattern = xlsolid

'Всего

Sheetsfind.RangeAH1:AI2.HorizontalAlignment = xlcenter

Sheetsfind.RangeAH1:AI1.Merge

Sheetsfind.RangeAH1:AI1.FormulaR1C1 = Всего

Sheetsfind.RangeAH2.FormulaR1C1 = Б

Sheetsfind.RangeAI2.FormulaR1C1 = П

Sheetsfind.RangeAH3.FormulaR1C1 = =IFRC[-32]=ВСЬОГО,SUMR[-1]C34:r3c,ifrc[-33]=,,COUNTIFRC[-31]:RC[-1],б

Sheetsfind.RangeAH3.AutoFill Destination:=sheetsfind.RangeAH3:AH100, Type:=xlfilldefault

Sheetsfind.RangeAI3.FormulaR1C1 = =IFRC[-33]=ВСЬОГО,SUMR[-1]C35:r3c,ifrc[-34]=,,COUNTIFRC[-32]:RC[-2],п

Sheetsfind.RangeAI3.AutoFill Destination:=sheetsfind.RangeAI3:AI100, Type:=xlfilldefault

' Sheetsfind.Visible = False

Goto 1

Else

1: 'Копия данных видвидування

Лист1.RangeA5.Value = Find

Sheetsfind.RangeC3:AG100.Copy

Лист1.RangeE7.PasteSpecial Paste:=xlvalues, Operation:=xlnone, Skipblanks:= _

False, Transpose:=false

Лист1.RangeE5.Select

Selection. Value = Даны посещения за + Rangea4.Value + _

месяц группы № + Strrangea2.Value

Лист1.ComboBox1.Enabled = False

Лист1.ComboBox2.Enabled = False

Лист1.CommandButton1.Enabled = False

Лист1.CommandButton2.Enabled = True

Лист1.CommandButton3.Enabled = True

Лист1.RangeA1.Value = Yes

End If

End Sub

макрос клавиши "Очистить" на листе "Ввид"
Реакция программы на нажатие клавиши "Очистить":
· Вывод предупредительного окна и получения ответа от користувача
· В случае позитивного ответа:
O запрещение вывода призвищ
O Отключения клавиш "Очистить" и "Зберегти"
O Включения элементов выбора группы и месяца и клавиши "Вивести"

Private Sub Commandbutton2_click

but = Msgboxви действительно хотите очистить таблицу посещения?, vbquestion _

+ vbokcancel

If but = 1 Then

Rangee7:ai100.Cells. Formula =

Rangee5.Value =

Лист1.ComboBox1.Enabled = True

Лист1.ComboBox2.Enabled = True

Лист1.CommandButton2.Enabled = False

Лист1.CommandButton1.Enabled = True

Лист1.CommandButton3.Enabled = False

Rangea1.Value = No

End If

End Sub

макрос клавиши "Сохранить" на листе "Ввид"
Реакция программы на нажатие клавиши "Сохранить":
· Проверка письма на предмет наличия ошибок и в случае их присутствия вывод соответствующего сообщения.
· Сохранение данных на соответствующем письме:
· Запрещение вывода призвищ
· Отключение клавиш "Очистить" и "Зберегти"
· Включение элементов выбора группы и месяца и клавиши "Вивести"

Private Sub Commandbutton3_click

If Лист1.RangeA6 0 Then

but = Msgboxв данных знадени ошибки. Виправте их перед збережанням, vbcritical

Else

but = Msgboxви действительно хотите сохранить данные посещения?, vbquestion _

+ vbokcancel

If but = 1 Then

Лист1.RangeE5.Value =

Лист1.RangeE7:AI100.Copy

Sheetsлист1.RangeA5.Value.RangeC3.PasteSpecial Paste:=xlvalues, Operation:=xlnone, Skipblanks:= _

False, Transpose:=false

Лист1.RangeE7:AI100.Cells. Formula =

Лист1.ComboBox1.Enabled = True

Лист1.ComboBox2.Enabled = True

Лист1.CommandButton2.Enabled = False

Лист1.CommandButton1.Enabled = True

Лист1.CommandButton3.Enabled = False

Лист1.RangeA1.Value = No

End If

End If

End Sub

макрос клавиши "Создать" на листе "Звит"
Реакция программы на нажатие клавиши "Создать":
· Очистка письма от предыдущего звиту
· Для каждого выбранного в Listbox письма:
O Вывод «шапки»
O Пересмотр данных и проверка данных по количества пропускив
O Копирования отобранных данных на лист «Звит»
· Создание обобщенного звиту
· Создание диаграми

Private Sub Commandbutton1_click

RW = 17

GR = 0

Rangea17:ai5000.Clear

For I = 0 To Listbox1.ListCount - 1

If Listbox1.SelectedI Then

'SH - Название листа данных с текущей группой и мисяцем

SH = Midlistbox1.ListI, 38, 6

'Печатаем шапку для группы и мисяця

With RANGEA + Midstrrw, 2 +:AI + Midstrrw, 2

.Merge

.HorizontalAlignment = xlcenter

.Font. Bold = True

.Value = Midlistbox1.ListI, 1, 29

.Interior. Colorindex = 4

End With

RW = RW + 1

PN = 1

'Шапка Из днями

Rangea16:ai16.Copy

RANGEA + Midstrrw, 2.PasteSpecial

With RANGEA + Midstrrw, 2 +:AI + Midstrrw, 2

.Interior. Colorindex = 4

.Font. Bold = True

.Font. Color = 0

End With

RW = RW + 1

'Пересматриваем диапазон Ah3:ah100

For Each Cel In SHEETSSH.RangeAH3:AH100

'Но кроме пустых амбарчиков и кроме Всего

If Cel. Value And SHEETSSH.RangeB + Midstrcel. Row, 2.Value ВСЕГО Then

'Для тех амбарчиков, которые удовлетворяют все вищеперечислени условия перевиряемо

'подходят ли они по критериям отбора за максимально разрешенными килькостями

If Cel. Value Sheetsзвит.RangeN3.Value Or _

SHEETSSH.RangeAI + Midstrcel. Row, 2.Value Sheetsзвит.RangeR3.Value Then

'Номер

RANGEA + Midstrrw, 2.Value = Pn

PN = PN + 1

'Копируем фамилию и дани

SHEETSSH.RangeB + Midstrcel. Row, 2 +:AI + Midstrcel. Row, 2.Copy

RANGEB + Midstrrw, 2 +:AI + Midstrrw, 2.PasteSpecial Paste:=xlvalues, Operation:=xlnone, Skipblanks:=false, Transpose:=false

RW = RW + 1

End If

End If

Next

'Всего

RANGEB + Midstrrw, 2.Value = Всего

RANGEA + Midstrrw, 2 +: + AI + Midstrrw, 2.Font. Bold = True

If PN 1 Then RANGEAH + Midstrrw, 2.FormulaR1C1 = =SUMR[- + Midstrpn - 1, 2 + ]C:r[-1]C _

Else RANGEAH + Midstrrw, 2.Value = 0

If PN 1 Then RANGEAI + Midstrrw, 2.FormulaR1C1 = =SUMR[- + Midstrpn - 1, 2 + ]C:r[-1]C _

Else RANGEAI + Midstrrw, 2.Value = 0

With RANGEC + Midstrrw, 2 +:AG + Midstrrw, 2

.Merge

.Value = Listbox1.ListI

.Font. Colorindex = 2

End With

RW = RW + 1

GR = GR + 1

End If

Next I

'ВОЗВЕДЕН Звит

'Заголовок

PN = 0

With RANGEA + Midstrrw, 2 +:AI + Midstrrw, 2

.Merge

.Interior. Colorindex = 4

.HorizontalAlignment = xlcenter

.Font. Bold = True

.Font. Size = 18

.Value = Возведен отчет видвидування

End With

'Даны по группам за мисяць

RW = RW + 1

For Each CL In Rangeb17:b + Midstrrw, 2

If CL. Value = ВСЕГО Then

PN = PN + 1

With RANGEB + Midstrrw, 2 +:AG + Midstrrw, 2

.Merge

.Value = Midrangec + Midstrcl. Row, 2.Value, 1, 29

End With

RANGEAH + Midstrrw, 2.Value = RANGEAH + Midstrcl. Row, 2.Value

RANGEAI + Midstrrw, 2.Value = RANGEAI + Midstrcl. Row, 2.Value

RW = RW + 1

End If

Next Cl

'Всего

With RANGEB + Midstrrw, 2 +:AG + Midstrrw, 2

.Merge

.Value = Всего

.Font. Bold = True

.HorizontalAlignment = xlcenter

End With

RANGEAH + Midstrrw, 2 +:AG + Midstrrw, 2 _

.FormulaR1C1 = =SUMR[- + Midstrpn, 2 + ]C:r[-1]C

RANGEAI + Midstrrw, 2 +:AG + Midstrrw, 2 _

.FormulaR1C1 = =SUMR[- + Midstrpn, 2 + ]C:r[-1]C

If GR 2 Then

RANGEAH + Midstrrw - PN, 2 +:AI + Midstrrw - 1, 2.Activate

Charts. Add

Activechart. Setsourcedata Source:=sheetsзвит.RangeAH + Midstrrw - PN, 2 +:AI + Midstrrw - 1, 2

Activechart. Location Where:=xllocationasnewsheet

Activechart. Axesxlvalue.MajorGridlines. Select

Activechart. Chartarea. Select

Activechart. Seriescollection1.XValues = =Звит! R + Midstrrw - PN, 2 + C2:r + Midstrrw - 1, 2 + C33

Activechart. Seriescollection1.Name = =Б

Activechart. Seriescollection2.XValues = =Звит! R + Midstrrw - PN, 2 + C2:r + Midstrrw - 1, 2 + C33

Activechart. Seriescollection2.Name = =П

With Activechart

.HasTitle = True

.ChartTitle. Characters. Text = Диаграмма видвидування

.AxesxlValue, xlprimary.HasTitle = True

.AxesxlValue, xlprimary.AxisTitle. Characters. Text = Дни

End With

Activechart. Haslegend = True

Activechart. Legend. Position = xltop

Activechart. Seriescollection1.ApplyDataLabels Type:=xldatalabelsshowvalue, _

Autotext:=true, Legendkey:=false

Activechart. Seriescollection2.ApplyDataLabels Type:=xldatalabelsshowvalue, _

Autotext:=true, Legendkey:=false

End If

End Sub

Текст макроса радио-клавиши "Сортировать по группам" на листе "Звит"

Private Sub Optionbutton1_click

Listbox1.Clear

M = 1

For Each Wh In Worksheets

If Midwh. Name, 3, 1 = - Then

AM = Группа + Midwh. Name, 4 + Midwh. Name, 1, 2 + Sheetswh. Name.RangeC1

AM = AM + Space30 - LENAM + Письмо + Wh. Name +

M = M + 1

End If

Next

Sort

For I = 1 To M - 1

AI = MIDAI, 1, 9 + - + MIDAI, 12

Listbox1.AddItem Ai

Next I

End Sub

Текст макроса радио-клавиши "Сортировать по месяцам" на листе "Звит"

Private Sub Optionbutton2_click

Listbox1.Clear

M = 1

For Each Wh In Worksheets

If Midwh. Name, 3, 1 = - Then

AM = Wh. Name + Sheetswh. Name.RangeC1

AM = AM + Space30 - LENAM + Письмо + Wh. Name +

M = M + 1

End If

Next

Sort

For I = 1 To M - 1

d = Ai

AI = MIDAI, 7, 10 + + Группа + MIDAI, 4, 3

AI = AI + Space30 - LENAI + Midd, 30

Next I

For I = 1 To M - 1

Listbox1.AddItem Ai

Next I

End Sub

Текст макроса sort на листе "Звит"

Dim A500

Dim M

Sub Sort

For I = 1 To M - 1

For J = 1 To I - 1

If AI AJ Then

T = Ai

AI = Aj

AJ = T

End If

Next J

Next I

End Sub

Целесообразность автоматизации.

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