| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
If text found in Row, delete Column
Perfect... thank you
"RB Smissaert" wrote: Try this: Sub test() Dim c As Long For c = 256 To 1 Step -1 If Cells(10, c) = "Adjust" Then Columns(c).Delete End If Next End Sub RBS "JEFF" wrote in message ... Thanks for the response.. a bit of a novice and couldn't get it to work: ** The text I'm looking for ("Adjust") will always be in row 10..... "RB Smissaert" wrote: Sub test() Dim c As Long 'looking for values in row 4, starting in column 30 For c = 30 To 1 Step -1 If Cells(4, c) = 1 Then Columns(c).Delete End If Next End Sub RBS "JEFF" wrote in message ... Hello, I'd like to be able to search a row for some text and, if found, delete that column... Appreciate any help. |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| return text value found most frequently in a column | Excel Worksheet Functions | |||
| How to delete row if column is blank or certain text | Excel Programming | |||
| To Delete the specific rows when blank is found on column A | Excel Programming | |||
| Delete Rows when Blanks are found in Column A:A | Excel Programming | |||
| Search column - return row found in long text string | Excel Programming | |||
Hybrid Mode
