Какие имена книг останутся в коллекции 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    .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    .Add    .Open (PathDir & "BookThree.xls")    .Open (PathDir & "BookFive.xls")    .Item(2).Close    .Item(3).CloseEnd WithEnd Sub

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

Public Sub WorkWithDocuments()Dim N As Long, I As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Documents    .Add NewTemplate:=True    .Add    .Open (PathDir & "DocFive")    .Open (PathDir & "DocThree")    .Item(2).Close    .Item(3).CloseEnd WithEnd Sub

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

Public Sub WorkWithDocuments()Dim N As Long, I As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Documents    .Add    .Add NewTemplate:=True    .Open (PathDir & "DocThree")    .Open (PathDir & "DocFive")    .Item(1).Close    .Item(2).CloseEnd WithEnd Sub

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

Public Sub WorkWithDocuments()Dim N As Long, I As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Documents    .Add NewTemplate:=True    .Open (PathDir & "DocThree")    .Open (PathDir & "DocFive")    .Item(3).CloseEnd WithEnd Sub

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

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

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

Как будет выглядеть в языке VBA открытие диалогового окна "Open" из меню File в приложении Excel?

Какое свойство коллекции Sheets приложения Excel возвращает родительский объект?