это быстро и бесплатно
Оформите заказ сейчас и получите скидку 100 руб.!
Ознакомительный фрагмент работы:
Отчет по лабораторной работе № 3
Тема: Создание макросов в т.р. Word.
Задание:
1. Создание макроса для оформления шаблона документа blank.dot
· Cервис - макрос – начать запись – изменение имени на МакроWA – вставка – объект WordArt- завершить макрос. Сервис – настройка – команды – добавляем макрос на панель инструментов – выделяем макрос – «изменить выделенный объект» - «текст только в меню» - «выбрать значок для кнопки».
Selection.InlineShapes.AddPicture FileName:= _
"D:TEMPPROFAll UsersDocumentsMy PicturesSample PicturesWater lilies.jpg" _
, LinkToFile:=False, SaveWithDocument:=True
· Создали макрос аналогично макросу МакроWA, который вставлял бы рисунок, Присвоили имя макросу МакроРис.
Selection.InlineShapes.AddPicture FileName:= _
"D:TEMPPROFAll UsersDocumentsMy PicturesSample PicturesSunset.jpg" _
, LinkToFile:=False, SaveWithDocument:=True
· На основе двух созданных макросов создали один, используя редактор VBA и сохранили под именем МакроWAR: сервис - макрос – макросы – выбираем макрос МакроWA – «изменить» - копируем текст макрома Макро Рис и вставляем после текста макроса МакроWA. Для вызова создали кнопку: Сервис – настройка – команды – добавляем макрос на панель инструментов – выделяем макрос – «изменить выделенный объект» - «текст только в меню» - «выбрать значок для кнопки».
Selection.InlineShapes.AddPicture FileName:= _
"D:TEMPPROFAll UsersDocumentsMy PicturesSample PicturesWater lilies.jpg" _
, LinkToFile:=False, SaveWithDocument:=True
Selection.InlineShapes.AddPicture FileName:= _
"D:TEMPPROFAll UsersDocumentsMy PicturesSample PicturesSunset.jpg" _
, LinkToFile:=False, SaveWithDocument:=True
· Создали макрос, который: добавляет страницу в текст ( вставка – разрыв – «начать новую страницу») и необходимо, чтобы ориентация этой страницы была альбомная ( файл – параметры страницы – ориентация альбомная). Присвоили имя макросу МакроПС.
Selection.InsertBreak Type:=wdPageBreak
With ActiveDocument.Styles(wdStyleNormal).Font
If .NameFarEast = .NameAscii Then
.NameAscii = ""
End If
.NameFarEast = ""
End With
With ActiveDocument.PageSetup
.LineNumbering.Active = False
.Orientation = wdOrientLandscape
.TopMargin = CentimetersToPoints(3)
.BottomMargin = CentimetersToPoints(1.5)
.LeftMargin = CentimetersToPoints(2)
.RightMargin = CentimetersToPoints(2)
.Gutter = CentimetersToPoints(0)
.HeaderDistance = CentimetersToPoints(1.25)
.FooterDistance = CentimetersToPoints(1.25)
.PageWidth = CentimetersToPoints(29.7)
.PageHeight = CentimetersToPoints(21)
.FirstPageTray = wdPrinterDefaultBin
.OtherPagesTray = wdPrinterDefaultBin
.SectionStart = wdSectionNewPage
.OddAndEvenPagesHeaderFooter = False
.DifferentFirstPageHeaderFooter = False
.VerticalAlignment = wdAlignVerticalTop
.SuppressEndnotes = False
.MirrorMargins = False
.TwoPagesOnOne = False
.BookFoldPrinting = False
.BookFoldRevPrinting = False
.BookFoldPrintingSheets = 1
.GutterPos = wdGutterPosLeft
End With
Сделайте индивидуальный заказ на нашем сервисе. Там эксперты помогают с учебой без посредников
Разместите задание – сайт бесплатно отправит его исполнителя, и они предложат цены.
Цены ниже, чем в агентствах и у конкурентов
Вы работаете с экспертами напрямую. Поэтому стоимость работ приятно вас удивит
Бесплатные доработки и консультации
Исполнитель внесет нужные правки в работу по вашему требованию без доплат. Корректировки в максимально короткие сроки
Гарантируем возврат
Если работа вас не устроит – мы вернем 100% суммы заказа
Техподдержка 7 дней в неделю
Наши менеджеры всегда на связи и оперативно решат любую проблему
Строгий отбор экспертов
К работе допускаются только проверенные специалисты с высшим образованием. Проверяем диплом на оценки «хорошо» и «отлично»
Работы выполняют эксперты в своём деле. Они ценят свою репутацию, поэтому результат выполненной работы гарантирован
Ежедневно эксперты готовы работать над 1000 заданиями. Контролируйте процесс написания работы в режиме онлайн
Русский язык. Тема механизм освоения родительного падежа немецкоящычными студентами
Другое, Магистерская работаа
Срок сдачи к 5 сент.
Написать отчет по практике
Отчет по практике, Организация предпринимательской деятельности
Срок сдачи к 29 авг.
Онлайн помощь на защите курсовой по строительной механике
Онлайн-помощь, Строительная механика
Срок сдачи к 1 сент.
Тема: личность преступника. Особо опасный тип.
Другое, Научно-исследовательская работа. Уголовное право.
Срок сдачи к 31 авг.
Написать курсовую по готовой структуре
Курсовая, национальная и региональная экономика
Срок сдачи к 20 сент.
Разработка и эксплуатация нефтяных и газовых месторождений
Отчет по практике, Разработка и эксплуатация нефтяных и газовых месторождений
Срок сдачи к 31 авг.
отчет по прохождению практики
Отчет по практике, Технологическая (проектно-технологическая) практика.
Срок сдачи к 28 авг.
Создать задания по формированию основ (предпосылок) функциональной грамотности у обучающихся
Другое, Начальные классы, педагогика
Срок сдачи к 1 сент.
кр 5 вариант
Контрольная, ОП.05 Проектная и исследовательская деятельность в профессиональной сфере, педагогика
Срок сдачи к 31 авг.
Формирование орфографической зоркости на уроках русского языка в 3...
Диплом, Педагогика и психология
Срок сдачи к 25 нояб.
Заполните форму и узнайте цену на индивидуальную работу!