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
Sub Macro1() Dim ws, ws1 As Range Dim iMatches, iIsdup As Integer Set ws = Range("A1:Z3000") Set ws1 = Range("A1:Z3000") iMatches = 1 For Each Row In ws.Rows If IsEmpty(ws.Cells(Row.Row, 1)) Then Exit For Else For Each row1 In ws1.Rows If IsEmpty(ws1.Cells(row1.Row, 1)) Then Exit For Else If ws1.Cells(row1.Row, 1).Value = ws.Cells(Row.Row, 1).Value Then Worksheets("Sheet2").Rows(iMatches & ":" & iMatches) = row1 iMatches = iMatches + 1 iIsdup = 1 End If End If Next End If Next End Sub
|Calculating tiered commission based on plan name and amount||7||32|
|Excel -- need lookup or match function||4||34|
|Select a random value from list and chg background color.||5||22|
|Excel list clean up||6||19|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
20 Experts available now in Live!