crea la query che vuoi aprire e salvala con un nome (es. query1) e usa il comando
DoCmd.OpenQuery("query1")
il comando
DoCmd.RunSQL
va bene per le query di comando