с задачами Dim Tsk As

Public Sub WorkWithTasks() 'Работа с задачами Dim Tsk As Task Debug.Print Application.Tasks.Count For Each Tsk In Application.Tasks Debug.Print Tsk.Name Next Tsk
End Sub

Листинг 1.24.

Закрыть окно

Содержание раздела