Dim strClassName As String
Dim objClass As Object

strClassName = "Class1"

Set objClass = New strClassName

という具合に任意のクラスのインスタンス化って可能ですか？