I've been searching online for clues on how to fix this error (there are plenty of cases)... but I can't find any example that would really help figure this one out. I'm getting the "Object variable or With block variable not set" error when I click on my click button.
Public ConnectMM As Object
Public GraphletsMM As Object
Sub Gather()
On Error GoTo Recover
Dim x
InitializeEP
Application.Cursor = xlWait
x = ThisWorkbook.ConnectMM.ReadTableVec(Worksheets("Main Table").Range("B3"), Worksheets("Main Table").Range("B4"), 0, 3, 0, Worksheets("Main Table").Range("c3:k27"))
Application.Cursor = xlDefault
If x <> "OK" Then MsgBox x
Exit Sub
Recover:
If Err.Number = 424 Then
InitializeEP
Resume
Else
MsgBox Err.Description
Application.Cursor = xlDefault
End If
End Sub
Any assistance would be greatly appreciated.
Thanks!
Pedro
Bookmarks