建立物件變數
您可以將 物件變數 視為與它所參考的 物件 完全相同。 您可以設定或傳回 物件的 屬性 ，或使用其任何 方法。
建立物件變數
宣告物件變數。
將物件變數指派給物件。
宣告物件變數
使用 Dim 語句或其中一個其他宣告語句 (Public、 Private 或 Static) 來宣告物件變數。 參考物件的 變數 必須是 Variant、 Object 或特定類型的物件。 例如，下列宣告有效：
' Declare MyObject as Variant data type.
Dim MyObject
' Declare MyObject as Object data type.
Dim MyObject As Object
' Declare MyObject as Font type.
Dim MyObject As Font
注意事項
如果您未先宣告物件變數，則物件變數 的數據類型 預設為 Variant 。
當特定物件類型在程式執行之前未知時，您可以使用 Object 資料類型宣告 物件 變數。 使用 Object 數據類型來建立任何物件的泛型參考。
如果您知道特定的物件類型，您應該將物件變數宣告為該物件類型。 例如，如果應用程式包含 Sample 物件類型，您可以使用下列其中一個語句來宣告該物件的物件變數：
Dim MyObject As Object ' Declared as generic object.
Dim MyObject As Sample ' Declared only as Sample object.
宣告特定物件類型可提供自動類型檢查、更快速的程式代碼，以及改善的可讀性。
將物件變數指派給物件
使用 Set 語句將物件指派給物件變數。 您可以指派 物件表示式 或 Nothing。 例如，下列物件變數指派是有效的。
Set MyObject = YourObject ' Assign object reference.
Set MyObject = Nothing ' Discontinue association.
您可以使用 New關鍵詞搭配 Set 語句，將宣告物件變數與將物件指派給它結合。 例如：
Set MyObject = New Object ' Create and Assign
將物件變數設定為 Nothing 會停止物件 變數與任何特定對象的關聯。 這可防止您藉由變更 變數不小心變更物件。 關閉相關聯的物件之後，物件變數一律會設定為 Nothing ，因此您可以測試物件變數是否指向有效的物件。 例如：
If Not MyObject Is Nothing Then
' Variable refers to valid object.
. . .
End If
當然，這項測試絕對無法判斷使用者是否已關閉包含物件變數所參考之物件的應用程式。
參考物件的目前實例
使用 Me 關鍵詞來參照執行程式代碼之物件的目前實例。 與目前 對象相關聯的所有程式都可以存取稱為 Me的物件。 使用 我 對於將物件目前實例的相關信息傳遞至另一個模組中的程序特別有用。 例如，假設您在模組中有下列程式：
Sub ChangeObjectColor(MyObjectName As Object)
MyObjectName.BackColor = RGB(Rnd * 256, Rnd * 256, Rnd * 256)
End Sub
您可以使用下列語句來呼叫 程式，並將物件的目前實例當做自變數傳遞：
ChangeObjectColor Me
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。