Habe diese Felder manuell mit 1 multipliziert, hat geklappt.
Jetzt das Problem:
Lasse ich ein aufgezeichnetes Makro laufen, funktioniert es nicht. Hier der Code:
'In K1 steht die Zahl 1
Range("K1").Select
Selection.Copy
Range("D2:F39").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlMultiply, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
Selection.NumberFormat = "m/d/yyyy"
Gruß Waltraud