Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails
Private Sub DeleteRowsWithSmallAmountAtIssue() ' Delete rows that have a value of Delete in Column B. Dim rng1 As Range Dim rng2 As Range Dim lngRow As Long 'Application.ScreenUpdating = False If [b2] <> vbNullString Then Set rng1 = Range([b2], [b1].End(xlDown)) Else Set rng1 = [b1] End If For lngRow = rng1.Rows.Count To 2 Step -1 If (Cells(lngRow, "B") = "Delete") Then 'Rows(lngRow).EntireRow.Delete If rng2 Is Nothing Then Set rng2 = Rows(lngRow) Else Set rng2 = Union(rng2, Rows(lngRow)) End If Else ' If Left$(Cells(lngRow, "c"), 2) <> "CV" Then Rows(lngRow).EntireRow.Delete End If Next rng2.EntireRow.Delete Application.ScreenUpdating = True End Sub
|Excel VBA - copying formats||7||15|
|Excel 2010 - Text not aligning at bottom of cell!||5||16|
|In Excel 2007 in data validation list, why does Excel perform a calculation when entering 2: 1 in the data validation list and how should I change this so no calculation is performed?||2||17|
|How to check with VBA if an excel formula has multiple terms in it?||2||15|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
7 Experts available now in Live!