Find them and Extract them – VBA Macro

Share

Facebook
Twitter
LinkedIn

I started a new consulting gig with NZ Ministry of Business (aside: when I told my daughter about this, she widened her eyes and said, “ministry of MAGIC!!!”). On my first day, while having lunch in breakout area, I chatted with the gentleman sitting opposite me. We got talking about this and that and eventually the topic turned to What I do at MB. So I told him that I am helping the HR with some data analysis and reporting using Excel & SQL Server. He asks me, “So you must be familiar with Excel object model”. I said, “oh, why yes”. He then asks me, “I have this problem that is bothering me for years. You see, I get a lot of data. And I use Find (Ctrl+F) to find all the cells that contain certain code. But the results are all over the place. I want to know how to extract all the finds to a target worksheet – value & address format.”

I explained him how to do this while chewing mouthfuls of rice & veggies.

But once I am home, I thought, “hey, maybe there are others out in the world who want to do this”.

find-and-extract-smith-v4

So here we go.

How to find and extract all matching values

Let’s say you have some data in a range like this.

find-and-extract-data

And you want to find all cells with comp in them. If the values are all in one column, you could use auto-filter to quickly filter cells with comp in them and copy paste them to a target range.You can even automate the steps a bit with advanced filter

But what if the data can be in any column?

We can use Find (Ctrl+F) to find the values and click on “Find all” to see all results in the find box. But to extract them, we must take the red pill and escape the limitations of Excel to enter in to the exciting world of VBA.

Here is a quick demo of what our find and extract macro does.

find-extract-all-macro-demo

Here is the code:


Sub findAll()
    Dim findWhat As String, address As String
    Dim fsr As Range, rs As Range, fCount As Long
    
    findWhat = InputBox("Enter what you want to find?", "Find what...")
    
    If Len(findWhat) > 0 Then
        clearFinds
        Set frs = Range("b4").CurrentRegion
        Set rs = frs.Find(What:=findWhat)
        If Not rs Is Nothing Then
            address = rs.address
            Do
                Range("I5").Offset(fCount).Value = rs.Value
                Range("J5").Offset(fCount).Value = rs.address
                Set rs = frs.FindNext(rs)
                fCount = fCount + 1
            Loop While Not rs Is Nothing And rs.address <> address
        End If
    End If
End Sub

How does it work?

The code is inspired from Bill Jelen’s excellent example on Find method on MSDN.

The logic goes like this.

  1. We start by asking the user what they want to find and store this in findWhat string variable.
  2. If the string to find is not empty,
  3. We clear any previous find results
  4. We grab the current region for cell B4 (change this to the top-left of your find range)
  5. We look for findWhat in this range using range.Find method
  6. As long as Find result is not empty and not same as the first result
    1. We copy the value & address to I5 (change this to target range as per your workbook setup)

Download the Find and Extract workbook

Click here to download the example workbook. Play with the macro to learn its inner workings.

The rabbit hole is deep, don’t stop just here…

If you enjoyed this little macro, you are going to love VBA. Check out our free starter tutorial or extensive VBA section for more.

How would you find and extract results?

I thought the Find method approach would be slow, but I am surprised to see that on a medium sized dataset (12000 values), the macro produced results almost instantly. So I would be using it more often to iterate thru a range to find a value.

What about you? Do you have such problems at work? Do you use VBA to solve them or just ask colleagues during lunch break and hope for a miracle? Please share your approach in the comments.

Facebook
Twitter
LinkedIn

Share this tip with your colleagues

Excel and Power BI tips - Chandoo.org Newsletter

Get FREE Excel + Power BI Tips

Simple, fun and useful emails, once per week.

Learn & be awesome.

Welcome to Chandoo.org

Thank you so much for visiting. My aim is to make you awesome in Excel & Power BI. I do this by sharing videos, tips, examples and downloads on this website. There are more than 1,000 pages with all things Excel, Power BI, Dashboards & VBA here. Go ahead and spend few minutes to be AWESOME.

Read my storyFREE Excel tips book

Overall I learned a lot and I thought you did a great job of explaining how to do things. This will definitely elevate my reporting in the future.
Rebekah S
Reporting Analyst
Excel formula list - 100+ examples and howto guide for you

From simple to complex, there is a formula for every occasion. Check out the list now.

Calendars, invoices, trackers and much more. All free, fun and fantastic.

Advanced Pivot Table tricks

Power Query, Data model, DAX, Filters, Slicers, Conditional formats and beautiful charts. It's all here.

Still on fence about Power BI? In this getting started guide, learn what is Power BI, how to get it and how to create your first report from scratch.

28 Responses to “Team To Do Lists – Project Tracking Tools using Excel [Part 2 of 6]”

  1. [...] & tracking a project plan using Gantt Charts Team To Do Lists - Project Tracking Tools Part 3: Preparing a project time line [upcoming] Part 4: Time sheets and Resource management [...]

    • Jacobus says:

      the templates are great (I bought the combo).
      What I'm missing is a way to have the project gantt chart and reporting with the data per resource, in such a way that I can also show the occupation per resource on an extended gantt chart.

      So with hours entered per person per project or sub-activity, to show a gantt chart of how many hours/days a person spent on which project (or plans to spend).

  2. [...] from: Team To Do Lists - Project Tracking Tools using Excel [Part 2 of 6] 25 Jun 09 | [...]

  3. ross says:

    Hi Chandoo,

    Funny I have a post on the value of MS project lined up which I will post when the current monster project I'm working on finishes and I get some free time!

    I'm not sure this would help with any of the projects I've worked on, closing down a to do list seems like more effort than it's worth, but it might be useful for some things. I guessing it doesn't, but does the time stamp not update when you recalculate the work book?

    keep up the good work!
    Ross

  4. Chandoo says:

    @Ross.. Thanks for sharing your ideas... I think to do lists are a great way to keep up with project activities and ensure accountability from individual team members, when they are implemented right.

    "I guessing it doesn’t, but does the time stamp not update when you recalculate the work book?"

    Your guess is right. When you change the calculation mode to "iterative", excel takes care of the nittygritties and retains older values in circular references in formulas.

  5. [...] Project Management in Excel [New Series] - Gantt Charts | To Do Lists [...]

  6. [...] & tracking a project plan using Gantt Charts Team To Do Lists - Project Tracking Tools Project Status Reporting - Create a Timeline to display milestones Part 4: Time sheets and Resource [...]

  7. Tam says:

    Hi Chandoo,
    The template give me lot of convenience to monitor the thing to do. It simple. Thank You

  8. [...] & tracking a project plan using Gantt Charts Team To Do Lists - Project Tracking Tools Project Status Reporting - Create a Timeline to display milestones Part 4: Time sheets and Resource [...]

  9. [...] make sure you have read the first 4 parts of the series - Making gantt charts [project planning], team todo lists [project tracking], project time lines chart [reporting] and Timesheets and Resource Management using Excel. Also [...]

  10. Brian says:

    Chandoo,

    I really do not see any befit to this function in Excel unless it was somehow tied into some other chart. That is say a scheduled activities % complete is based on the to-do list.

    The only way this chart would be useful is if no one was assigned none dependent task that could be done by anyone. The cases were both of these conditions are true are so few and far between it really makes this chart worthless.

  11. Chandoo says:

    @Brian... Once you have a todo list up and running, it is easy to get metrics out of it. I didnt propose it as it might look a bit too micro-management-ish.

    I am able to understand what you meant by "The only way this chart would be useful is if no one was assigned none dependent task that could be done by anyone. The cases were both of these conditions are true are so few and far between it really makes this chart worthless."

    Can you explain?

  12. Brian says:

    "Chandoo"

    What I mean is this. Lets say you have 10 task which are part of one activity/WBS that is in your schedule. One there are very few cases were many people would be assigned to complete this one scheduled activity with no direction being given who should what of the 10 task. It is poor management, and the task 90% of the time would not get done in a timely manner if say 4 people were responsible. Secondly, you are assuming all 10 task are independent of each other. You might need to do task 1 thru 3 before you can do task 4, and to do task 7 you might need to do 4 and 6. Thirdly, the time it would take to compile and then fill out the to-do-list even in limited applications is really not worth it.
    I just see almost no applications why a team would need to inform others separate from the schedule that they have completed a task on a to-do list unless anyone of the 4 people could of completed that task.

    My point is, there might be a few very limited applications for this type of list but this list would be worthless as a Project Management tool in every other case.

    However, change this from a to-do-list to a document change log and it is perfect. Instead of to-do it is the documents name or summary of what changed in the document. The person is who edited the document, and the time stamp is when they checked it in. But I do not know why you would use excel when there is free software you can use commercially that is 10 times better that does document management.

    I think using excel to do Project Management over a real Project Management application is a bad idea. Unless you are running a very small, simple project, the time and effort is a lot more to use excel compared to the cost of the Project Management software.

    This comes back to my point, I love your site, however, just because you can do something in excel does not mean you should do it. To often the time it takes to use excel is wasted 10 times over from the cost of doing it in an application designed to for the specific application.

  13. Chandoo says:

    @Brian: The todo list mentioned here is meant to keep track of all the tasks for which detailed planning is not necessary but some sort of tracking is needed. These are not be confused with project activities (a la gantt chart).

    I like your suggestion about using this as a document tracker. Pretty cool use.

    Coming to your point about excel as a real project management tool, well, I have my views, but in a serious project environment, it would surely payoff to have a dedicated project management application.

  14. [...] & tracking a project plan using Gantt Charts Team To Do Lists – Project Tracking Tools Project Status Reporting – Create a Timeline to display milestones Time sheets and Resource [...]

  15. Somnath says:

    Chandoo,

    Wonder how the timestamp column will maintain its previous data. Both Today() and Now() functions will update as and when the next timestamp happens.

  16. [...] Preparing & tracking a project plan using Gantt Charts Part2: Team To Do Lists – Project Tracking Tools Part3: Project Status Reporting – Create a Timeline to display milestones Part4: Time sheets and [...]

  17. Tate says:

    I've combined this with the issue tracker since I like the automatic date stamp, but one thing I'm noticing is that I can't replicate the chart that goes along with the issue tracker because the cells that are referenced have the formula that inserts the time stamp instead of a the actual date value. All the dates of the last 30 days display 0 when they should have a value.

    Is there a way around this?

  18. Mitch says:

    I have edited the chart so that my team members can update the percentage completion of the assigned tasks. When the cell is updated, i would like the time stamp to update. How would I manipulate the formula to update whenever the drop-down list is changed?

  19. Excel is great however sometimes you need to get a better idea of what tasks each person on your team is working on at any given time. We've developed a web app that can do just that! Each person has a list of tasks, listed in the order they have to complete them.

  20. Yukti Kumar says:

    HII,

    I want to expand the database through excel where i am working on 11 cities as of now and i want to expand it upto 50 cities and hence forth the data related to it will also expand so i want to make it precise where i can get updates also that this work is required to be done at that particular day or date

  21. BudB says:

    Thanks for making all of this information available for free. I am currently using excel to track everything for the first time. I later plan to output our information here with a more visual presentation. Wish me luck!

  22. Learner says:

    Can some one point me out to some additional direction on the "Who Finished it?" column? Something more 'basic' for a newbie excel guy? lol I got everything else working on this tutorial but that column. I can't seem to recreate it and I know a lot of it is due to lack of knowledge with VB code. I'd like to recreate this column very much 🙁

  23. Nishad says:

    Dear Chandoo,
    Thanks for the team to do list, kindly let me know how to set the column who " finished it " from another work sheet

  24. Srihari says:

    Hi Chandoo,

    Unable to download it - can you please check the link and confirm.

  25. Aryona says:

    Great inhisgt! That's the answer we've been looking for.

  26. Tushar Kacha says:

    Hi Team,

    I know u all are the best programmers in the world!!! that's I am here to rectify my issues. here is my question please ans me as soon as possible before 8-3-2017 its really urgent.

    I have a project named the production tracker.

    1) I require the user form which shows the names of the Associates which are linked to the different tracks. when the user is selected the particular track related details and dropdowns should appear.

    2) I need to track the associate needs how much of the time to complete the particular task. with start stop and pause and resume timer.

    3) It should display the daily count of the production and save the data to the another Excel file.

    this production tracker should save all the data no matter how many people logs in into it.

    Please help me for this it will be very appreciated.

    you can directly email me on my mail ID: tusharkch694@gmail.com

Leave a Reply