| Home |
| Search |
| Today's Posts |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Inserting cells using VBA
Thanks. that works.
-- Sreedhar "Joel" wrote: For RowCount = 1 To 3500 If IsNumeric(Range("H" & RowCount).Value) Then Range("F" & RowCount).Insert Shift:=xlToRight End If Next RowCount "Sreedhar" wrote: Hi, I want a macro that inserts cells at column "F" and shifts the cells right <IF the cell value at column "H" meets certain criteria. something like: For each cell in Range(H1:H3500") If IsNumeric(cell.value) Then 'only numbers, nulls excluded ''''Insert three cells at "F" and shift right End If Next cell Thanks -- Sreedhar |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Blocked from Inserting individual cells or Insert Cut Cells | Excel Discussion (Misc queries) | |||
| Inserting Cells | Excel Programming | |||
| Inserting the same text in various cells | Excel Discussion (Misc queries) | |||
| Inserting cells between cells with text | Excel Discussion (Misc queries) | |||
| Inserting cells | Excel Programming | |||
Threaded Mode
