Hey thanks, I have now changed my code to make it more readable!
I put in the new code, and now i come up with a type mismatch error, and i have found that it occurs in these lines;
queryString2 = queryString2 & " part_select.BOM, " & _
queryString2 = queryString2 & " part_select.BOMName, " &...