Методические указания по выполнению учебной практики студентами 1 курса (стр. 2 из 5)
Нажмите кнопку Создать на стандартной панели инструментов, чтобы создать новый чистый документ.
Наберите заголовок текста Проект служебного распоряжения.
8.Выберите Вставка / Поле, чтобы открыть окно Поле, выберите в Категориях пункт Все, если он не подсвечен автоматически, затем выберите поле Create Date и задайте формат M/D/YYYY H:MM:SS A/P (например, 20/11/2006 4:15:07 РМ) и нажмите ОК.
9. Набрать следующий текст:
№ 056 г. Пермь
[О создании …]
ПРЕДЛАГАЮ:
1. Создать …
2. Определить …
3. Считать …
4. Распоряжение довести по принадлежности.
5. Контроль за исполнение распоряжения возложить на заместителей начальника по курируемым направлениям.
10. Выполните команду Сохранить как (или нажмите Ctrl+S),чтобы открыть диалоговое окно.
11. Сохраните документ под именем Проект1.doc в папке Мои документы.
12. Нажмите кнопку (Остановить запись) на панели инструментов или на индикаторе.
13. Протестируйте макрос. Для этого выберите Сервис / Макрос / Макросы, а затем выберите имя вашего макроса в списке и нажмите кнопку Выполнить. VBA создаст новый документ, введет текст в него и сохранит документ.
Задание № 2. Запись макроса в Excel
Запустите Microsoft Office Excel.
Выберите Сервис / Макрос / Начать запись.Замените предложенное по умолчанию имя макроса (Макрос1), на имя Создание_Рабочего_Бюджета.
В списке Сохранить в выберите Личная книга макросов.
Добавьте следующий текст к началу автоматически созданного описания: Создание проекта рабочего Бюджета.
Нажмите OK, чтобы закрыть диалоговое окно Запись макроса. При этом запустится процесс записи и появится диалоговое окно Остановить запись 
.
ПРИМЕЧАНИЕ: И начинаем записывать макрос, как музыку на диске: начинаем записывать все выполняемые вами операции с целью дальнейшего запуска. Будьте очень внимательны при записи макроса – не делайте лишних действий и ошибок.
Нажмите кнопку Создать на стандартной панели инструментов, чтобы создать новую книгу.
8. Наберите таблицу, предложенную ниже:
| ПЕРИОД ВРЕМЕНИ | ||||||
| Дата / Время | ||||||
| ОПЕРАЦИЯ | ПРОВОДКА | ДОКУМЕНТ | ||||
| № п/п | Дата | ОПИСАНИЕ | Сумма | Дебит | Кредит | |
9.Выполните команду Сохранить, чтобы открыть диалоговое окно Сохранить как.
Сохраните книгу под именем Бюджет.xls в папке по вашему усмотрению. Например, используем папку d:\ Общие.
Нажмите кнопку Остановить запись кнопку на индикаторе или на панели инструментов, выбрав Сервис / Макрос / Остановить запись.
10.Протестируйте получившийся макрос. Для этого выберите Сервис / Макрос / Макросы или нажмите Alt+F8. Затем выберите имя вашего макросе в списке, и нажмите кнопку Выполнить. VBA создаст новую книгу, создаст таблицу, введет в нее соответствующую информацию и сохранит книгу. Заметьте, что Excel покажет вам предупреждение о перезаписи, сохраняемой книга, в то время как Word делает это молча.
Задание № 3
Рассмотрим создание макроса переход по страницам любого уровня в тексте документа Word. Такой макрос даст нам возможность быстро перемещаться по тексту.
1. В меню Сервис / Макрос и активизируем пункт Начать запись.
2. В окне Запись макроса в качестве имени макроса введём Переход_страниц.
3. Для задания горячей комбинации клавиш нажмём вторую кнопку со словом Клавишам из группы кнопок под именем Назначить макрос.
4. В открывшемся окне Настройка клавиатуры нажимаем комбинацию Ctrl+H, находясь в строке Новое сочетание. Нажмите сначала кнопку Назначить, а затем - кнопку Закрыть. Горячая комбинация для вызова макроса назначена, и запись макроса началась.
5. В меню Правка нажмите Перейти.
6. В раскрывшемся окне Найти и заменить в списке Объект перехода выставляем значение Страница. Проверяем, что строка под названием Введите номер страницы пуста. Нажимаем кнопку Далее. Затем нажмите кнопку Закрыть. Диалог Найти и заменить закрывается, курсор оказывается на следующей странице в тексте документа.
7. В меню Сервис / Макрос активизируем пункт Остановить запись.
8. Протестируйте получившейся макрос. Теперь в любой момент мы можем нажать комбинацию Ctrl+H, и курсор тут же переместиться к следующей странице. Таким образом, быстро можно просмотреть любой объемный документ.
9. Создайте аналогичный макрос для перехода к предыдущей странице. С его помощью можно быстро перемещаться по тексту и в обратном направлении. Для этого горячей комбинацией этого макроса необходимо назначить комбинацию Ctrl+Shift+H. А в строке Введите номер страницы окна Найти и заменить поставить знак минус.
Задание № 4
1.Запустите Microsoft Office Excel.
2.Откройте Лист Excel и в ячейке А1 вставьте цифру 7.
3.Выберите Сервис / Макрос / Начать запись.
4.В появившемся окне Запись макроса в поле Имя макроса указать ПРОБА.
5. Задайте комбинацию клавиш для его запуска (например, Ctrl + q) и нажмите кнопку ОК.
6. Выполнить следующие операции:
ПРИМЕЧАНИЕ: Будьте очень внимательны при записи макроса – не делайте лишних действий и ошибок.
- сначала выделите ячейку А1, нажав на неё, затем копируйте её содержание и вставляйте в ячейку С1 (простая операция копирования).
7.Нажмите кнопку Остановить запись кнопку на индикаторе или на панели инструментов, выбрав Сервис / Макрос / Остановить запись.
8. Удалите данные с листа, а затем в ячейку А1, поставьте любое значение и нажмите Ctrl + q. Если вы всё сделали правильно, в ячейку С1 должны автоматически копироваться значения А1.
9. Перейдем к редактору Visual Basic. Для этого через меню Сервис / Макрос / Макросы нажмите кнопку Изменить – откроется окно редактора Visual Basic.10. Рассмотрите более подробно автоматически созданный программный код. Вот как выглядит макрос или процедура (программный код) задачи копирования ячейки А1 в ячейку С1.
ПРИМЕЧАНИЕ: Процедура - это общее название всех самостоятельных частей кода. Процедура - участок кода, выделенный ключевыми словами Sub (в начале процедуры: за ним следует ее имя) и End Sub (окончание процедуры: помещается на отдельной строке). Обычно процедура выполняет одно или несколько действий.
11. Выделите строки программного кода от «Range…» до «…Paste» и копируйте их либо через меню Edit / Copy, либо с помощью правой кнопки мыши.
12. Сместите строку «End Sub» на одну строку ниже и в пустую строку вставьте скопированный программный код.
13. Во вставленном программном коде измените «А1» на «С1» и «С1» на «Е1».
14. Через панель задач перейти в Microsoft Office Excel и очистите все ячейки, а затем наберите любое значение в ячейке А1.
15. Запустите на выполнение измененный макрос либо нажатием комбинации клавиш Ctrl + q, либо через меню Сервис / Макрос / Макросы / Выполнить.
Задание № 5
Запустите Microsoft Office Excel.
Откройте Лист Excel.
Выберите Вид / Панели инструментов/ Visual Basic.
На открывшейся панели редактора Visual Basic нажмите кнопку Панель элементов управления и перенести элемент «Кнопка» на рабочее поле.
На Панели элементов управления нажмите кнопку Окно свойства и в появившемся окне Properties в графе Caption переименуйте название кнопки CommandButton1 на Создание Овала.
6. Выберите Сервис / Макрос / Начать запись.
7. В появившемся окне Записи Макроса укажите Имя макроса и комбинацию клавиш для его запуска (Ctrl +а) и нажмите ОК.
8. С панели Рисование перенесите на рабочее поле Овал, а затем выделите этот объект и зайдите в Формат Автофигуры, а затем зайдите Цвет Заливки – Красный, Цвет линии – черный, Толщина линии – 3 пт.
9. В меню Сервис / Макрос активизируйте пункт «Остановить запись».
10 . Зайдите в Microsoft Visual Basic в меню Редактор Visual Basic в модулях найти наш Макрос, скопируйте код макроса и вставьте в процедуру: