jerry0110 Erfahrenes Mitglied 13. Januar 2016 #11 Code: WkSh_Q.Columns(rZelle.Column).Copy WkSh_Z.Columns(iSpalte).PasteSpecial xlPasteValues das ist die Lösung
Code: WkSh_Q.Columns(rZelle.Column).Copy WkSh_Z.Columns(iSpalte).PasteSpecial xlPasteValues das ist die Lösung