Code is
Dim SQLtext As String
SQLtext = "SELECT [2tblSighting].SightingID, [2tblSighting].AnimalGroup, [2tblSighting].Species, [2tblSighting].Depth, [2tblSighting].Sighted, [2tblSighting].Method, [2tblSighting].Explorer, [2tblSighting].SightDate, [2tblSighting].Extinct, [2tblSighting].Notes...