annodata è una tua variabile, devi metterla così

Rs.Open "select numero from fatturequery where year(data)=" & annodata & "order by id DESC",Conn,2,3

lo sapevi!