Hi, How do I delete a rows in Column F if a cell reflects a value of more than $5,000. Thanks
D Danny Oct 25, 2005 #1 Hi, How do I delete a rows in Column F if a cell reflects a value of more than $5,000. Thanks
C Chip Pearson Oct 25, 2005 #2 You can do it with a VBA macro: Sub AAA() Dim LastRow As Long Dim RowNdx As Long LastRow = Cells(Rows.Count, "F").End(xlUp).Row For RowNdx = LastRow To 1 Step -1 If Cells(RowNdx, "F").Value > 5000 Then Rows(RowNdx).Delete End If Next RowNdx End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com
You can do it with a VBA macro: Sub AAA() Dim LastRow As Long Dim RowNdx As Long LastRow = Cells(Rows.Count, "F").End(xlUp).Row For RowNdx = LastRow To 1 Step -1 If Cells(RowNdx, "F").Value > 5000 Then Rows(RowNdx).Delete End If Next RowNdx End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com