Работа в приложениях Word и Excel

Размещено на http://www.allbest.ru/

Федеральное агентство железнодорожного транспорта

Омский государственный университет путей сообщения

(ОмГУПС (ОмИИТ))

Кафедра «Автоматика и системы управления»

ОТЧЕТ

по учебной практике

Место прохождения учебной практики:

Студентка гр. 26 и

С.А. Сулейменова

Руководитель учебной практики

доцент кафедры АиСУ

А.Б. Кильдибеков

201__/201__ учебный год



Задание

Задание по программе Microsoft Word.

Определите стили «Рисунок», «Подпись к рисунку», «Таблица» и «Заголовок таблицы» для оформления рисунков и таблиц. Создайте макросы «Вставка рисунка» и «Вставка таблицы». Макросы должны вставлять таблицу из одной колонки в двух строк с невидимыми границами. Первая строка должна быть оформлена стилем «Рисунок» (««Заголовок таблицы»), вторая - «Подпись к рисунку» («Таблица»). В нужных местах должны появиться надписи «Рисунок» или «Таблица». Назначьте макросам горячие клавиши.

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

Задание по программе Microsoft Excel.

Построить двумерный график эпициклоиды по параметрическим уравнениям кривой:

x = (R + r) cos - d cos ( (R + r) / r);

y = (R + r) sin - d sin ( (R + r) / r),

microsoft excel word макрос

значения параметров: R = 100, r = 10, d = 20; угол меняется от 0 до 360 градусов. Построить двумерный график и оформить его в соответствии СТП ОмГУПС.

Смоделировать ситуацию, описанную в былине про Илью Муромца, в которой перед богатырем ставится задача выбрать одну из трех дорог. В одной из смежных ячеек вводится вариант пути (1, 2 или 3), а в другой в это время появляется описание последствий выбора.

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

Постройте график функции и найти корень уравнения, f(x) = 3x + sin(x) - x^2 -2, с помощью подбора параметра, по 11-ти точкам на отрезке [-1; 2] и найти корень уравнения f(x)=0, при начальном приближении х=0,5. Ответ: х=0,5982.

Найдите решение системы линейных алгебраических уравнений (СЛАУ) и оформите исходные данных и решение по образцу. 0,9x + 4,9y - 6,6z = 0,9 2,6x - 1,8y + 0,4z = 0,3 0,5x + 3,8y - 0,4z = 2,7. Ответ: x=0,5235; y=0,6886; z=0,4463.



Реферат

Пояснительная записка к отчету по учебной практике содержит 18 страниц, 1 таблица, 9 рисунков, 2 листинга, 2 использованных источника.

Microsoft Word, Microsoft Excel, стиль, макрос, диаграмма, гистограмма, таблица, график функции, стандарт.

Объектом учебной практики являются программы Microsoft Office.

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

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

Пояснительная записка выполнена в текстовом редакторе Microsoft Word 2010.



Содержание

Введение

1. Microsoft Word

1.1 Выполнение работы

2. Microsoft Excel

2.1 Выполнение работы

Заключение

Библиографический список



Введение

Приложения Word и Excel входят в состав всех выпусков офисного пакета Microsoft Office.

Microsoft Word - текстовый процессор, предназначенный для создания, просмотра и редактирования текстовых документов, с локальным применением простейших форм таблично-матричных алгоритмов. Выпускается корпорацией Microsoft в составе пакета Microsoft Office. Продукт занимает ведущее положение на рынке текстовых процессоров. Редактор позволяет автоматизировать настройку шрифтов, абзацев, нумерацию, оглавление и другие элементы текста с помощью стилей и макросов.

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

1 Microsoft Word

Microsoft Word обеспечивает простое и удобное форматирование текстового файла за счет продуманных инструментов и понятного интерфейса. Благодаря широкому спектру функций текстовый процессор Microsoft Word напоминает настольную издательскую систему.

В данном блоке учебной практики были сформированы навыки оформления учебной документации с использованием программы Microsoft Word.Была проведена работа с текстом, таблицами, рисунками, формулами, объектами. Использованы шаблоны, стили оформления, виды форматирования текста в Microsoft Word, стандарты оформления текстовых документов - СТП ОмГУПСа.

1.1 Выполнение работы

Код макросов «Вставка_таблицы» и «Вставка_формулы» представлены на листингах 1.1 и 1.2.

Sub Вставка_таблицы1()

Вставкатаблицы1 Макрос

ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, NumColumns:= _

1, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _

wdAutoFitFixed

With Selection.Tables(1)

If .Style <> "Сетка таблицы" Then

Style = "Сетка таблицы"

End If

ApplyStyleHeadingRows = True

ApplyStyleLastRow = False

ApplyStyleFirstColumn = True

ApplyStyleLastColumn = False

ApplyStyleRowBands = True

ApplyStyleColumnBands = False

End With

Selection.Style = ActiveDocument.Styles("Название таблицы")

Selection.TypeText Text:="Таблица"

Selection.MoveDown Unit:=wdLine, Count:=1

Selection.Style = ActiveDocument.Styles("Таблица")

Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone

Листинг 1.1 - Код макроса "Вставка таблицы", Лист 1

Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone

Selection.MoveUp Unit:=wdLine, Count:=1

Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone

End Sub

Листинг 1.1 - Код макроса "Вставка таблицы", Лист 2

Sub вставка_формулы1()

вставкаформулы1 Макрос

ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=1, NumColumns:= _

3, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _

wdAutoFitFixed

With Selection.Tables(1)

If .Style <> "Сетка таблицы" Then

Style = "Сетка таблицы"

End If

ApplyStyleHeadingRows = True

ApplyStyleLastRow = False

ApplyStyleFirstColumn = True

ApplyStyleLastColumn = False

ApplyStyleRowBands = True

ApplyStyleColumnBands = False

End With

Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone

Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone

Selection.SelectCell

Selection.ParagraphFormat.Alignment = wdAlignParagraphRight

Selection.Cells.VerticalAlignment = wdCellAlignVerticalCenter

Листинг 1.2 - Код макроса "Вставка формулы", Лист 1

Selection.MoveLeft Unit:=wdCharacter, Count:=2

Selection.SelectCell

Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter

Selection.Cells.VerticalAlignment = wdCellAlignVerticalCenter

Selection.InlineShapes.AddOLEObject ClassType:="Equation.3", FileName:="", _

LinkToFile:=False, DisplayAsIcon:=False

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _

"LISTNUM \s 1 ", PreserveFormatting:=False

Selection.MoveLeft Unit:=wdCharacter, Count:=1

With ListGalleries(wdNumberGallery).ListTemplates(1).ListLevels(1)

NumberFormat = "(2.%1)"

TrailingCharacter = wdTrailingTab

NumberStyle = wdListNumberStyleArabic

NumberPosition = CentimetersToPoints(0.63)

Alignment = wdListLevelAlignLeft

TextPosition = CentimetersToPoints(1.27)

TabPosition = wdUndefined

ResetOnHigher = 0

StartAt = 1

With .Font

Bold = wdUndefined

Italic = wdUndefined

StrikeThrough = wdUndefined

Subscript = wdUndefined

Superscript = wdUndefined

Shadow = wdUndefined

Outline = wdUndefined

Emboss = wdUndefined

Engrave = wdUndefined

AllCaps = wdUndefined

Hidden = wdUndefined

Underline = wdUndefined

Color = wdUndefined

Size = wdUndefined

Animation = wdUndefined

DoubleStrikeThrough = wdUndefined

Name = ""

End With

LinkedStyle = ""

End With

ListGalleries(wdNumberGallery).ListTemplates(1).Name = "equation"

Selection.Range.ListFormat.ApplyListTemplateWithLevel ListTemplate:= _

Листинг 1.2 - Код макроса "Вставка формулы", Лист 2

ListGalleries(wdNumberGallery).ListTemplates(1), ContinuePreviousList:= _

False, ApplyTo:=wdListApplyToWholeList, DefaultListBehavior:= _

wdWord10ListBehavior

Selection.MoveLeft Unit:=wdCharacter, Count:=1

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.TypeBackspace

Selection.TypeBackspace

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.Paragraphs(1).SelectNumber

Selection.TypeBackspace

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.MoveLeft Unit:=wdCharacter, Count:=2

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _

"LISTNUM equation ", PreserveFormatting:=False

Selection.MoveLeft Unit:=wdCharacter, Count:=2

Листинг 1.2 - Код макроса "Вставка формулы", Лист 3

Результат использования макроса «Вставка_формулы» (например формула 1.1.)

(1.1)

Результат использования макроса «Вставка_таблицы» представлен на таблице 1.1.

Результат использования макроса «Вставка_рисунка» представлен на рисунке 1.1.



Рисунок 1.1 - ОмГУПС



2. Microsoft Excel

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

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

2.1 Выполнение работы

Результат выполнения задания по построению двумерного графика эпициклоиды по параметрическим уравнениям кривой представлен на рисунке 2.1.



Рисунок 2.1 - График эпициклоиды

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

Рисунок 2.2 - Выбор пути

Результаты построения диаграмм по таблице начисления заработной платы представлены на рисунках 2.3 - 2.5.

Рисунок 2.3 - Гистограмма начисленных денег

Рисунок 2.4 - Гистограмма отработанных часов



Рисунок 2.5 - Гистограмма среднего значения

График начисления заработной платы показан на рисунке 2.6.

Рисунок 2.6 - График начислений

Результат построения графика функции f(x)=3x+sin(x)-x^2-2 и нахождения корня уравнения, с помощью подбора параметра, по 11-ти точкам на отрезке [-1; 2], также нахождение корня уравнения f(x)=0, при начальном приближении х=0.5, представлен на рисунке 2.7.

Рисунок 2.7 - График функции и нахождение корня

Результат решения системы линейных алгебраических уравнений (СЛАУ) представлен на рисунке 2.8.



Рисунок 2.8 - Решение СЛАУ



Заключение

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

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

Приобретены практические навыки работы на персональных компьютерах с использованием современных пакетов прикладных программ электронного документооборота Microsoft Office.



Библиографический список

1. СТП ОмГУПС - 1.2-2005: Работы студенческие учебные и выпускные квалификационные.

2. Стоцкий Ю.А. Microsoft Office 2010. Самоучитель: Пособие/ Ю.А. Стоцкий, А.А. Васильев, И.С. Телина. СпБ.: Питер, 2011. 432с.

Размещено на Allbest.ru