select ap_nr as Nskst, (sum(stoerzeiten) /sum(schichtzeit)) *100 as _
  Stoerzeitgrad,  DatePart("ww",[Schicht_datum],2,2) AS kw, year(schicht_datum) _
  as Jahr from leistungsbeleg where schicht_datum between  #2016/01/01# and _
  #2016/07/31# and ap_nr in ('528.03')  group by ap_nr,  DatePart( _
  "ww",[Schicht_datum],2,2) , year(schicht_datum)  order by ap_nr

Wer aufhört sich zu verbessern, hört auf gut zu sein.