Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete cells in column every
Hi
How do I delete cells left every second cell in my column B starting from 4 cells down in the column? Been looking for hours to do this...... Any help is appreciated, Andrea |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete cells in column every
One way:
Dim rDelete As Range Dim i As Long Set rDelete = Cells(4, 2) For i = 6 To Cells(Rows.Count, 2).End(xlUp).Row Step 2 Set rDelete = Union(rDelete, Cells(i, 2)) Next i rDelete.Delete Shift:=xlToLeft In article .com, wrote: Hi How do I delete cells left every second cell in my column B starting from 4 cells down in the column? Been looking for hours to do this...... |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
delete cells column. Delete empty cells | Excel Worksheet Functions | |||
How can I delete all balnk cells in a column? | Excel Discussion (Misc queries) | |||
Easiest way to delete blank cells in column (not entire row) | Excel Discussion (Misc queries) | |||
In a column of text data, how do I delete random cells that have . | Excel Discussion (Misc queries) | |||
delete all EMPTY cells along each COLUMN | Excel Programming |