Вход


Главная страница >> Учебный процесс >> Конспекты >> MS Office. Руководство программиста по Visual Basic для MS Office 97 >> Опимизация кода >> Основные принципы оптимизации кода >> Удаление лишних выражений из записанных акросов

Переход на главную страницу

Сервер поддерживается
кафедрой информатики и вычислительной техники ГрГУ
тел. +375-(0)152-445-101
E-mail :
kadan@grsu.grodno.by


[Назад]    [Содержание ]    [Вперед]

  


Удаление лишних выражений из записанных акросов


Другая причина, по которой средство записи макросов генерирует неэффективный код, состоит в том, что этому средству не известно, какой параметр Вы изменили в диалоговом окне. Поэтому, когда Вы закрываете диалоговое окно, в макросе явно устанавливаются значения всех доступных параметров. Например, выделение ячеек В2:В14 и последующее изменение начертания шрифта на полужирное через диалоговое окно Format Cells (Формат ячеек) дает при записи макроса такой код:

Range( "В2:В14"). Select
With Selection. Font
═════.Name = "Arial"
═════.FontStyle = "Bold"
═════.Size = 10
═════.Strikethrough = False
═════.Superscript = False
═════.Subscript = False
═════.OutlineFont = False
═════.Shadow = False
═════.Underline = xINone
═════.ColorIndex = xlAutomatic
End With

Но то же самое можно сделать одной строкой кода:

Range("B2:B14"). Font. FontStyle = "Bold"

Более того, если Вы посмотрите на список свойств и методов объекта Font, Вы заметите, что этот макрос можно упростить за счет свойства Bold:

Range("B2:B14"). Font. Bold = True

А теперь попробуйте поэкспериментировать с записью макросов, выполняя одну и ту же операцию в пользовательском интерфейсе разными способами Например, если Вы примените к диапазону шрифт с полужирным начертанием, щелкнув кнопку Bold (Полужирный) на панели инструментов Standard (Стандартная), средство записи макросов задействует свойство Bold.



[Назад]    [Содержание ]    [Вперед]

  



Текст пособия подготовлен на основе материалов книги
Microsoft Corporation. Руководство программиста по Visual Basic для Microsoft Office 97 / Пер. с англ. - М.: Издательский отдел "Русская Редакция" ТОО "Channel Trading Ltd.", 1997. - 544 с.: илл.
c Оригинальное издание на английском языке,
Microsoft Corporation, 1997
c Русский перевод,
Microsoft Corporation, 1997

  
За содержание страницы отвечает Гончарова М.Н.
©
Кафедра СПиКБ, 2002-2017