llmclaughlin
Programmer
Does anyone see anything wrong with this. It goes through the row.delete but doesn't delete the row.
If Not dbTABLE_RESHIP Is Nothing Then
With dbTABLE_RESHIP
If .Rows.Count > 0 Then
For iDEL = 0 To .Rows.Count - 1
For iFND = 0 To dbTABLE.Rows.Count - 1
If .Rows(iDEL).Item(4) = dbTABLE.Rows(iFND).Item(4) Then
dbTABLE.Rows(iFND).Delete()
dbTABLE.AcceptChanges()
Exit For
End If
Next
Next
End If
End With
End If
Thanks
Louie
If Not dbTABLE_RESHIP Is Nothing Then
With dbTABLE_RESHIP
If .Rows.Count > 0 Then
For iDEL = 0 To .Rows.Count - 1
For iFND = 0 To dbTABLE.Rows.Count - 1
If .Rows(iDEL).Item(4) = dbTABLE.Rows(iFND).Item(4) Then
dbTABLE.Rows(iFND).Delete()
dbTABLE.AcceptChanges()
Exit For
End If
Next
Next
End If
End With
End If
Thanks
Louie