I've tried a few things but nothing seems to be doing what I want.
Here's a stop gap solution that at least displays records but with the annoying popup:
Code:
Dim stDocName As String Dim stLinkCriteria As String StDocName = "HHI Register" StLinkCriteria = "[Media Date Range Start] = [Enter Date