Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
For Next issue with repeated procedure
I have the procedure below. Basically I don't want to have
interminable lines of code when all I am doing is repeating the same procedure on a differnet range. How can I write the procedure that it loops through the procedure with the 6 different ranges rng1 = "A1:A9" rng2 = "A11:A20" Rng3 = "A30:A34" Rng4 = "A40:A48" Rng5 = "A50:A59" Rng6 = "A65:A69" n = 6 For i = 1 To n ActiveCell.Range(rng(i)).Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues Application.CutCopyMode = False Next i Thanks Rup |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
For Next issue with repeated procedure | Excel Programming | |||
For Next issue with repeated procedure | Excel Programming | |||
procedure call error issue | Excel Programming | |||
Workbook_open procedure issue when two spreadsheets are opened | Excel Programming | |||
Printing text in a repeated cell/row that is longer than repeated | Excel Discussion (Misc queries) |