ExcelVBAで配列の初期化するなら　Arrayするっきゃない

ExcelVBA

こんな感じ。

Dim userAddress As Variant

userAddress = Array("東京都", "北海道", "愛知県")

ネタ元