ExcelVBAで変数宣言と初期値入力を一行で書く方法

Dim str As String: str = "ABC"

てな感じ。