Replace is not the solution as i do not want to replace all true/ false
only the ones in queries

and i have a big project so i cann't check each and everyone and replace

i couldn't understand what you mean by
dim qd as dao.querydef
dim strSQL as string

for each qd in currentdb.querydefs
strSQL = qd.sql

next