с задачами 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. |
| Закрыть окно |
|
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. |
| Закрыть окно |