wsfilt.Range("D" & i).PasteSpecial (xlPasteValuesAndNumberFormats)
Entweder ohne Klammernpaar:
wsfilt.Range("D" & i).PasteSpecial xlPasteValuesAndNumberFormats
Oder die Call-Anweisung davor
Call wsfilt.Range("D" & i).PasteSpecial (xlPasteValuesAndNumberFormats)
|