с объектом Options
|
Public Sub WorkWithOptions() 'работа с объектом Options Options.AutoFormatAsYouTypeReplaceFractions = True Options.AllowDragAndDrop = True Options.CheckGrammarWithSpelling = True Options.EnableSound = False Options.MonthNames = wdMonthNamesEnglish Options.PrintComments = True End Sub |
| Листинг 1.19. |
| Закрыть окно |
