Gehört Spalte K zum Autofilterbereich ? Falls nicht, geht es so nicht.
Spalte M gehört nicht zum Autofilterbereich ... schreibe in M1 deinen String.
Range("M1").Copy Destination:=Range("K2:K7")
Sabina