VBA проверьте, существует ли объект
If obj Is Nothing Then
' need to initialize obj: '
Set obj = ...
Else
' obj already set / initialized. '
End If
Arno Deceuninck