Основы офисного программирования и язык VBA

<<- Назад к вопросам

Какие из перечисленных констант являются встроенными константами, связанными с приложением Excel?

(Ответ считается верным, если отмечены все правильные варианты ответов.)

Варианты ответа

wdEscape

xlWhite(Верный ответ)

wdOnly

vbKeyEscape

White

vbOKOnly

xlSunday(Верный ответ)

Похожие вопросы

Какие из перечисленных констант являются встроенными константами, связанными с приложением Word?

Какие из перечисленных констант являются встроенными константами языка VBA?

Какие методы использует приложение Excel для удаления элементов из коллекции Workbooks?

Какие методы использует приложение Excel для добавления элементов в коллекцию Workbooks?

Какие методы использует приложение Excel чтобы получить доступ к рабочей книге в коллекции Workbooks?

Достоинство какого способа организации обмена информацией между отдельными документами состоит в том, что проекты могут не быть связанными ссылками?

Что по умолчанию входит в каркас документа Excel?

Какие имена книг останутся в коллекции Workbooks приложения Excel после завершения работы этой программы?

Public Sub WorkWithbooks()Dim N As Long, i As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Workbooks    .Open (PathDir & "BookThree.xls")    .Open (PathDir & "BookFive.xls")    .Add    .Item(2).Close    .Item(3).CloseEnd WithEnd Sub

Какие имена книг останутся в коллекции Workbooks приложения Excel после завершения работы этой программы?

Public Sub WorkWithbooks()Dim N As Long, i As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Workbooks    .Open (PathDir & "BookThree.xls")    .Add    .Open (PathDir & "BookFive.xls")    .Add    .Item(5).Close    .Item(4).CloseEnd WithEnd Sub

Какие имена книг останутся в коллекции Workbooks приложения Excel после завершения работы этой программы?

Public Sub WorkWithbooks()Dim N As Long, i As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Workbooks    .Add    .Open (PathDir & "BookThree.xls")    .Open (PathDir & "BookFive.xls")    .Item(2).Close    .Item(3).CloseEnd WithEnd Sub