You could certainly make your strSQL string much shorter in a couple of ways:
Firstly, instead of using "strSQL = strSql &" , use the continuation code. ie.
strSQL = "SELECT fldOne,fldTwo, fldThree FROM " & _
"tblFields etc "
Secondly, name the table that the selected fields are coming...