Для установки ссылки объектной переменной на объект используется ключевое слово Set. Например:
Set objUser = New cUser