Set Statement
๋ณ์ ๋๋ ์์ฑ์์ ๊ฐ์ฒด ์ฐธ์กฐ๋ฅผ ์ค์ ํฉ๋๋ค.
๊ตฌ๋ฌธ:
Set ObjectVar = Object
๋งค๊ฐ ๋ณ์:
ObjectVar: ๊ฐ์ฒด ์ฐธ์กฐ๊ฐ ํ์ํ ๋ณ์ ๋๋ ์์ฑ์ ๋๋ค.
Object: ๋ณ์ ๋๋ ์์ฑ์ด ์ฐธ์กฐํ๋ ๊ฐ์ฒด์ ๋๋ค.
Nothing - ๋ณ์์ Nothing ๊ฐ์ฒด๋ฅผ ํ ๋นํ์ฌ ์ด์ ์ ํ ๋น๋ ๊ฐ์ ์ ๊ฑฐํฉ๋๋ค.
์:
Sub ExampleSet
Dim oDoc As Object
Set oDoc = ActiveWindow
Print oDoc.Name
End Sub