Testing for 'Object has been deleted' error

Cosmo · #6 04-04-2018, 05:12 AM

Quote:

Originally Posted by macropod

How about posting the code that's doing the row deletion? It seems that's the logical place to test the status of oTbl.

Here is the code I'm using, the issue is that if all rows are deleted, the table no longer exists, but the reference to oTable is not 'Nothing'. There are other steps which need to be performed to the table after deleting the rows, but I need to be able to test to see if the table has been deleted so I can skip those steps.

Code:

' Remove empty rows
rowCount = oTbl.Rows.count
columnCount = oTbl.Columns.count
For row = rowCount To 1 Step -1
    delete = True
    For column = 1 To columnCount
        If Not (oTbl.Cell(row, column).Range.Text = Chr(13) & Chr(7)) Then
            delete = False
            Exit For
        End If
    Next column
    If (delete) Then
        ' Remove row
        Call oTbl.Rows(row).delete
    End If
Next row
 
' NOTE: Need to check to see if table still exists here (If all rows were deleted)
If (tableExists(oTbl)) Then   ' Can't test for Nothing - object has been deleted, but is NOT nothing.
    ' Do other processing steps to table...

For now, I am using the 'tableExists' function I originally posted to test for the table, but I'd prefer to use a valid test, not testing for error.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
set row object variable error	CLoos	Excel Programming	6	03-10-2017 04:48 PM
Run-time error '424': Object required	zlodeh	Excel Programming	1	02-24-2016 01:58 AM
Run Time Error 424 - Object Required	Doug Needham	Excel Programming	4	01-12-2015 10:54 PM
Error Message: Could not load an object...	simstem	Word	1	10-06-2012 08:44 PM
XML parsing & Object variable not set (Error 91)	tinfanide	Excel Programming	0	12-29-2011 08:43 AM