...as follows:
SELECT tblFacility.Facility, tblTesRec.[Test Date], Year([Test Date]) AS [Year], tblTesRec.Result, IIf(Month([Test Date])=1,[Result],"*") AS Jan, IIf(Month([Test Date])=2,[Result],"*") AS Feb, IIf(Month([Test Date])=3,[Result],"*") AS Mar, IIf(Month([Test Date])=4,[Result],"*")...