Set Statement
Устанавливает объектную ссылку на переменную или свойство.
Синтаксис
Set Переменная = Объект
Параметры:
Переменная. Переменная или свойство, которым будет присвоена объектная ссылка.
Объект. Объект, на который будет ссылаться переменная или свойство.
Nothing. Назначьте переменной объект Nothing, чтобы удалить предыдущее назначение.
Пример:
Sub ExampleSet
Dim oDoc As Object
Set oDoc = ActiveWindow
Print oDoc.Name
End Sub