I have now updated all the fields to not include any dots so the line causing issues is now:
If (rs.Fields("Song " & intItem & " Chosen_Chorus" & intVerse).Value) = True Then
I am getting an error on that line saying Runtime error 3265 - Item not found in this collection
I have checked the query where the data is coming from and the field is there with the right name but doesn't seem to be finding it. The field is a checkbox - I wondered if that was something to do with it as I haven't used checkboxes in Access before.