Okay, thank you, done that. Slowly moving down the code. So now getting to this:
Set salesRST = CurrentDb.OpenRecordset(strSQL)
Getting run-time error: Too few parameters. Expected 2
Sorry if I'm being a pain but as I say I'm a noob really. I have this idea in my head for a DB and...