as for
and TableFour.Column6 In (Select TableFour.Column6
from TableFour,TableEightteen,TableNineTeen
Where TableFour.Column7 = TableNineTeen.Column7
and TableEightteen.Column17 = TableNineTeen.Column17
and TableFour.Column10 = TableNineTeen.Column10
and TableEightteen.Column18 > TableFour.Column16
)
pretty sure that can be
join TableEightteen on TableEightteen.Column18 > TableFour.Column16
join TableNineTeen on TableFour.Column7 = TableNineTeen.Column7
and TableFour.Column10 = TableNineTeen.Column10
and TableEightteen.Column17 = TableNineTeen.Column17