Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Conditional delete
Hi,
A B C D E F G H I are a block of cells. Cell C is the active cell (cursor position). If cell D contains the word "Group N" where N can be a number from 1 to 4, I want to delete the content of cells D, E, F, G, H and I. If not, to continue on with the next line of code. Any help is much appreciated. TIA Tom |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Conditional delete
select your C, F, I cells (or further down) and try:
Sub cus() For Each cell In Selection For i = 1 To 4 If cell.Offset(1, -2) = "Group " & i Then Range(cell.Offset(1, -2), cell.Offset(2, 0)).ClearContents Exit For End If Next i Next cell End Sub pls click YES if it helped On 15 Paź, 04:36, "tom" wrote: Hi, A Â* Â*B Â* Â*C D Â* Â*E Â* Â*F G Â* Â*H Â* Â*I are a block of cells. Cell C is the active cell (cursor position). If cell D contains the word "Group N" where N can be a number from 1 to 4, I want to delete the content of cells D, E, F, G, H and I. If not, to continue on with the next line of code. Any help is much appreciated. TIA Tom |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Conditional delete
Those codes work perfectly. Thank you, Jarek.
Regards, Tom "Jarek Kujawa" wrote in message ... select your C, F, I cells (or further down) and try: Sub cus() For Each cell In Selection For i = 1 To 4 If cell.Offset(1, -2) = "Group " & i Then Range(cell.Offset(1, -2), cell.Offset(2, 0)).ClearContents Exit For End If Next i Next cell End Sub pls click YES if it helped On 15 Paź, 04:36, "tom" wrote: Hi, A B C D E F G H I are a block of cells. Cell C is the active cell (cursor position). If cell D contains the word "Group N" where N can be a number from 1 to 4, I want to delete the content of cells D, E, F, G, H and I. If not, to continue on with the next line of code. Any help is much appreciated. TIA Tom |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
delete conditional formatting via macro | Excel Discussion (Misc queries) | |||
How can I use conditional formatting to hide or delete rows? | Excel Worksheet Functions | |||
Conditional Delete | New Users to Excel | |||
Macro code to delete conditional formatting | Excel Discussion (Misc queries) | |||
Adding a loop to conditional delete code | New Users to Excel |