Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Select each alternate row in a worksheet
Hi all,
Could I select each alternate row in my seleceted range of a worksheet, there is any way to do this. |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Select each alternate row in a worksheet
Try this macro:
Sub everyothre() Set s = Selection r1 = s.Cells(1, 1).Row r2 = s.Rows.Count + r1 - 1 Set cmp = s.Cells(1, 1).EntireRow For i = r1 To r2 Step 2 Set parts = Cells(i, 1).EntireRow Set cmp = Union(cmp, parts) Next Set cmp = Intersect(cmp, s) cmp.Select End Sub -- Gary''s Student - gsnu200798 "Abdul Shakeel" wrote: Hi all, Could I select each alternate row in my seleceted range of a worksheet, there is any way to do this. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can I create a worksheet menu to select each other worksheet | Excel Discussion (Misc queries) | |||
In Excel 2000, How do you select the whole of a worksheet (Select. | Excel Discussion (Misc queries) | |||
In Excel 2000, How do you select the whole of a worksheet (Select. | Excel Discussion (Misc queries) | |||
Select alternate rows to copy | Excel Discussion (Misc queries) | |||
select worksheet to run macro | Excel Discussion (Misc queries) |