Sub Makro5()
Range("F15").Select
Selection.Copy
Columns("C:C").Select
Selection.Find(What:= ??? , After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
.
.
.usw
So und da wo die 3 Fragezeichen stehen soll das was in der Zelle F15 bzw. jetzt ja auch in der Zwischenabalge ist rein.. ich kriegs aber nicht hin.. was muss ich reinschreiben?