![]() |
#5
|
|||
|
|||
![]()
.
Or maybe : Code:
Option Explicit Sub sbDelete_Rows_With_Specific_Data() Dim lRow As Long Dim iCntr As Long Dim iCol As Long iCol = 26 'add cols here lRow = 20 'add rows here For iCol = 1 To 26 'match last col number here with total cols above For iCntr = lRow To 1 Step -1 If Cells(iCntr, iCol) = "loan" Or Cells(iCntr, iCol) = "financial" _ Or Cells(iCntr, iCol) = "bank" Or Cells(iCntr, iCol) = "equity" Then ' You can change this text Rows(iCntr).Delete End If Next Next End Sub |
Tags |
excel vba, macros |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
liliaroma | Word VBA | 4 | 11-18-2017 07:53 PM |
Automatically Delete Slides based on current time | Pacman52 | PowerPoint | 2 | 07-16-2015 05:30 AM |
How to Automatically Add/Delete Columns Based On Information | kconnolly | Excel | 7 | 04-08-2014 07:23 AM |
Find and Delete Rows based on a range | damaniam | Excel Programming | 2 | 03-12-2014 06:06 AM |
![]() |
donaldadams1951 | Word VBA | 5 | 12-03-2013 10:08 AM |