Область видимости оператора set - VB

Формулировка задачи:

Здравствуйте. Не знаю как правильно дать название теме. Суть вот в чем. Есть 2 функции и 1 глобальный объект. В одной функции я устанавливаю объект так:

                    Листинг программы
                
Set obj = CreateObject(Object)

А в другой функции пытаюсь обратиться к методам объекта. Выдает ошибку 91. Подскажите, как быть?

Решение задачи: «Область видимости оператора set»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Dim Class As New Class1
 
Private Function create(Object As String) As Boolean
MsgBox Class.CreateObjects(Object)
End Function
 
Private Function WordOpen(Path As String) As Boolean
MsgBox Class.WordOpen(Path)
End Function
 
Sub Main()
 
obj = create("Word.Application")
asd = WordOpen("D:\mob\bb\1.docx")
End Sub