Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
move cells that meet a certain criteria to the row below
I want my macro to do the following: If Column E2="COA" I want it to move
COA to E3. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
move cells that meet a certain criteria to the row below
There are a few choices.
If you mean the equivalent of Cut|paste: Option Explicit Sub testme() With ActiveSheet If LCase(.Range("e2").Value) = LCase("COA") Then .Range("e2").Cut _ Destination:=.Range("E3") End If End With End Sub If you mean just reassign the value, you coul use: Option Explicit Sub testme2() With ActiveSheet If LCase(.Range("e2").Value) = LCase("COA") Then .Range("E3").value = .range("E2").value .range("e2").value = "" End If End With End Sub Donna wrote: I want my macro to do the following: If Column E2="COA" I want it to move COA to E3. -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
count cells that meet 2 criteria | Excel Worksheet Functions | |||
need to move data to certain column if they meet criteria | Excel Worksheet Functions | |||
Count Cells that meet Criteria | Excel Worksheet Functions | |||
Can I sum #s in a cell if other cells meet a certain criteria? | Excel Discussion (Misc queries) | |||
Sum Total # Of Cells That Meet Several Criteria | Excel Worksheet Functions |