For the time being, I coded with a close and re-open: (You might notice the SQL DELETE which deletes a record from the forms RecordSource and hence the need to Requery)
Code:
Select Case TaskName
Case "Delete"
If MsgBox("DELETE """ & Trim(strSelTitle) & """ from MyLinks?", vbYesNo, "Deleting Links") = vbYes Then
CurrentDb.Execute "Delete * FROM tblLinks WHERE LinkID = " & intSourceID
Call CompileLst
DoCmd.Close acForm, "MainPop"
DoCmd.OpenForm "MainPop", acPreview, , , , acDialog
Exit Function
Else
The problem with the above method is that on subsequent use of the Right-Click "Action" after the re-Open will only work one time. Subsequent attempts yield the condition shown in the pic below:
Attachment 34676