If you use the query designer, This should work:
Code:
SELECT tbl_343sTested.FixturePosition, tbl_343sTested.SerialNumber, tbl_343sTested.TestedDate, tbl_343sTested.Technician, tbl_343sTested.TankTestedIn, tbl_343sTested.LoadTested, tbl_343sTested.PreReading, tbl_343sTested.HighReading, tbl_343sTested.PostReading, tbl_343sTested.Recheck, tbl_343sTested.PassFail, tbl_343sTested.Tr343Id, tbl_343sTested.MeggerID, tbl_343sTested.PressureIndID, tbl_343sTested.Comment
FROM tbl_343sTested
WHERE tbl_343sTested.LoadTested = DMax("LoadTested","tbl_343sTested","[TestedDate] = #" & Date() & "#");
If it is in VBA, then it should still work:
Code:
sSQL = "SELECT tbl_343sTested.FixturePosition, tbl_343sTested.SerialNumber, tbl_343sTested.TestedDate, tbl_343sTested.Technician,"
sSQL = sSQL & " tbl_343sTested.TankTestedIn, tbl_343sTested.LoadTested, tbl_343sTested.PreReading, tbl_343sTested.HighReading,"
sSQL = sSQL & " tbl_343sTested.PostReading, tbl_343sTested.Recheck, tbl_343sTested.PassFail, tbl_343sTested.Tr343Id,"
sSQL = sSQL & " tbl_343sTested.MeggerID, tbl_343sTested.PressureIndID, tbl_343sTested.Comment"
sSQL = sSQL & " FROM tbl_343sTested"
sSQL = sSQL & " WHERE tbl_343sTested.LoadTested = " & DMax("LoadTested", "tbl_343sTested", "[TestedDate] = #" & Date & "#") & ";"
What am I missing?