DoCmd.SetWarnings False
DoCmd.OpenQuery "SORGUADI", acNormal, acEdit
DoCmd.SetWarnings True şeklinde düzenleyin.
Kod satırını;