Looking again.
Having looked again, I think I can see (sort of) where the problem lies.
My line which is on the Form_Open is :
strsql = "SELECT ID,Person,Task,Area,DateFrom,DateTo FROM TblMain WHERE 1 = 1"
I think I need it to be the sql from the row source. (SELECT ID, Person, Task, Area...