Thanks for all the help everyone. I've solved my problem by inserting the Where string into the query's filter instead of the criteria field as follows:
DoCmd.OpenQuery stDocName
DoCmd.ApplyFilter stDocName, WhereStr
DoCmd.OutputTo acOutputQuery, stDocName, acFormatXLS, , True
Thanks again all!