Анализ макросов в Microsoft Office Word 2007 (стр. 2 из 2)
Код макроса:
Sub Макрос1()
'' Макрос1 Макрос
'Selection.WholeStory
Selection.Font.Name = "Times New Roman"
Selection.Font.Size = 10
Selection.ParagraphFormat.Alignment = wdAlignParagraphJustify
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(2)
.BottomMargin = CentimetersToPoints(2)
.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
End Sub
Редактирование макроса
Чтобы отредактировать сделанный макрос выполните команду Вид =>Макросы, откроется окно Макрос и выбираем наш записанный макрос (рис. 6). Нажимаем «Изменить». Открывается окно редактирования макроса (рис. 7).
В этом окне можно подкорректировать макрос.
Макрос1 был изменён добавлена красная строка. Код красной строки:
With Selection.ParagraphFormat
.SpaceBeforeAuto = False
.SpaceAfterAuto = False
.FirstLineIndent = CentimetersToPoints(1)
End With
В рамках курсовой работы были проанализированы а также создан макрос в MicrosoftOfficeWord на основе средства записи макросов. Результатом курсовой работы, является созданный и подкорректированный макрос.
В процессе выполнения курсовой работы было выявлено, что не все стандартные макросы возможно включить в собственный, их надо писать самому на языке VBA.
Список используемых источников литературы
макрос программа редактирование макрорекодер
1. VBA - Википедия Режим доступа [http://ru.wikipedia.org/wiki/VBA] по состоянию на 15.03.2011 г.
2. Что такое макрос? Режим доступа [http://www.codenet.ru/progr/vbasic/bit/Macros.php] по состоянию на 15.03.2011 г.
3. Макрос и макрорекордер Режим доступа [http://www.on-line-teaching.com/vba/] по состоянию на 15.03.2011 г.