It worked ! !! It took a few minutes as I had 19,000 records to analyze. Many thanks to
arnelgp. I have a couple of other "Long Winded" queries that need better and more efficient programming but I won't bother anyone one for now. Have a great weekend everyone here...
UPDATE qryStatFillingInStat8 SET qryStatFillingInStat8.Stat8 = IIf(DCount("1","qryStatFillingInStat8","OptionCodes='" & [OptionCodes] & "'")=0,qryStatFillingInStat8.Stat8,"1 of " & DCount("1","qryStatFillingInStat8","OptionCodes='" & [OptionCodes] & "'"));