The Filter string is just the WHERE clause form your SQL statement.
Try:
Dim strWhere As String
If Me.Dirty Then Me.Dirty = False 'Save first.
strWhere = "(PUDate = Date()) OR (SchedDelDate = Date())"
Me.Filter = strWhere
Me.FilterOn = True

Signature
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.
> SELECT Shipment.PUDate, Shipment.SchedDelDate
> FROM Shipment
[quoted text clipped - 7 lines]
>
> Any help would be appreciated.