I've got the following code:
Range("K5").Select
If ActiveCell.Value <> "" Then
Selection.Copy
Range("K8").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
As you'll notice the two key cells are K5 and K8.
I want to be able to repeat this bit of code for L5/L8, M5/M8, N5/N8 . . . right up to EF5/EF8
Apart from just repeating the code with different cell references, how would I do a loop statement to take care of this a little more efficiently?
Thanks for your help.
Bookmarks