Return of Multiple Match Results Automatically

How to return multiple match results automatically with VBA using Auto-Filter and a wild card character.

Watch the video below:

Here’s the complete macro or VBA code to automatically extract multiple search results from Excel data:

Sub ReturnMultipleMatchResults()
Dim sName As String
Dim ws As Worksheet

Set ws = Worksheets(“Sheet1”)
Range(“H1:L15”).Clear
sName = InputBox(“Enter the sales person’s first name followed by an asterisk(*)”, “Sales Person”)
‘ws.Range(“A1:E13”).AutoFilter
ws.Range(“A1:E13”).AutoFilter field:=1, Criteria1:=sName
ws.Range(“A1:E13”).SpecialCells(xlCellTypeVisible).Copy
ws.Range(“H1”).PasteSpecial Paste:=xlPasteAll
Application.CutCopyMode = False
ws.AutoFilterMode = False

End Sub

Published by

Dinesh Kumar Takyar

Welcome to exceltrainingvideos.com! My aim is to help you learn MS Excel including VBA. I always felt that a good way to learn something was to find solutions to problems in that domain. That is why I share these Excel videos with you. Mostly these are questions asked during my corporate training sessions. I've been training individuals and companies in computers since 1991. I did my B. Sc. (Vordiplom), M. Sc. (Diplom) and Ph.D. (Dr. rer. nat.) from Hamburg, Germany. The best thing about solving some of my visitor's questions is that I also gain new insights. For more Excel VBA solutions you may like to visit my YouTube channel: http://youtube.com/familycomputerclub For a structured Excel VBA training course online you can visit: https://www.youtube.com/excelvbaonline

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.