Help me make this Piece of VBA into something a little more elegant?
I'm envisioning something like:
Sub
Define
rows=(62,108,154,200)
//Notes
i=Row
j=Column
//
i = 16
j = 3
Cell(i,j).Select
Selection.Copy
For i=rows
Cell(i,j).Select
ActiveSheet.Paste
Endsub
INSTEAD OF THIS...