Please Note: This article is written for users of the following Microsoft Excel versions: 2007, 2010, and 2013. If you are using an earlier version (Excel 2003 or earlier), this tip may not work for you. For a version of this tip written specifically for earlier versions of Excel, click here: Changing Default Search Settings.

Changing Default Search Settings

by Allen Wyatt
(last updated March 15, 2014)

9

When Dan displays the Find dialog box, the default settings are to search within worksheet and to look in formulas. He would like the default to be within workbook and to look in values, so he is wondering if there is a way to change the default.

Excel doesn't allow you to specify what settings you want for a default in the Find dialog box. There is a bit of a way around this seeming limitation, however—at least a partial way. Excel remembers the last settings in the Find dialog box for the entire Excel session. (The settings are not reset until you exit and restart Excel.) This means that all you need to do is create a small macro that will set the settings you want in the dialog box.

There are two ways you can do this. The first is to create a macro that sets the options in the dialog box directly, such as this:

Sub SetFind1()
    Application.Dialogs(xlDialogFormulaFind).Show,2,2
End Sub

The second way is to utilize the Find method of the Cells object, in this manner:

Sub SetFind2()
    Dim c As Range
    c = Cells.Find(What:="", LookIn:=xlValues, LookAt:=xlPart)
End Sub

Either of these will work just fine, to a point. (More about that in a moment.) All you need to do is run the macro when you first start Excel, either manually or as part of an Auto_Open macro. The settings in the dialog box are then changed for the remainder of the Excel session, unless you manually change them.

Now, to the point. It seems that there is no way to change the Within setting of the dialog box. This setting defaults to looking in the Worksheet. You can manually change it to Workbook, and Excel will dutifully remember the setting for your current session. However, you cannot seem to change the setting within VBA. You'll note that neither of the sample macros, above, change this particular setting. Further, if you record a macro in which you change the two settings (Within and Look In), you end up with something that looks like this:

Sub Macro1()
'
' Macro1 Macro
'
'
    Sheets("Sheet1").Select
    Cells.Find(What:="", After:=ActiveCell, LookIn:=xlValues, _
        LookAt:=xlPart, SearchOrder:=xlByRows, _
        SearchDirection:=xlNext, MatchCase:=False).Activate
End Sub

If you save the workbook in which this macro exists, restart Excel, and then examine the settings in the Find dialog box (press Ctrl+F), you'll note that the settings are back to the default of searching within the worksheet and looking in formulas. Run the macro and then look at the dialog box again; you should see that the settings are for looking in values within the worksheet; the macro doesn't set the Within setting, even though you recorded it when you set Within to Workbook.

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (8802) applies to Microsoft Excel 2007, 2010, and 2013. You can find a version of this tip for the older menu interface of Excel here: Changing Default Search Settings.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He  is president of Sharon Parq Associates, a computer and publishing services company. ...

MORE FROM ALLEN

Creating a Calendar Tool

Word has no way to add a calendar to your document that can be used for inserting dates, but you can add a calendar tool that ...

Discover More

Deleting MRU Entries

By default Word dutifully keeps track of the different files you've worked on in the past. If you want to delete an entry ...

Discover More

Wrapping Text Around a Graphic

Place a graphic in your document, and you may want to make sure that your document text "wraps" around the edges of the ...

Discover More

Program Successfully in Excel! John Walkenbach's name is synonymous with excellence in deciphering complex technical topics. With this comprehensive guide, "Mr. Spreadsheet" shows how to maximize your Excel experience using professional spreadsheet application development tips from his own personal bookshelf. Check out Excel 2013 Power Programming with VBA today!

More ExcelTips (ribbon)

Finding Boolean Values

Excel worksheets can contain all sorts of data. One thing you might store in a worksheet is a range of Boolean (TRUE or ...

Discover More

Searching for Leading Apostrophes

Take a look at the Formula bar when you select a cell that contains text, and you may see an apostrophe at the beginning of ...

Discover More

Searching for Wildcards

Wildcard characters can be used within the Find and Replace tool, but what if you want to actually search for those wildcard ...

Discover More
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] in your comment text. You’ll be prompted to upload your image when you submit the comment. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is six less than 6?

2017-01-24 13:29:41

Quentin

This worked, but not when I hid the PERSONAL.XLSB

I tried adding a "SendKeys" ESC in case it was the hidden dialog box that was the problem but that didn't help.

Have you made this Auto_Open in a hidden Personal.XLSB? If so - what exactly do I put in AutoOPen()?

Many thanks indeed
Quentin


2016-07-11 10:43:03

Just Me

Perfect! Thank you!

Sub SetFind1()
Application.Dialogs(xlDialogFormulaFind).Show,2,2
End Sub


2015-06-24 11:46:19

Willy Vanhaelen

@Nicole

The second macro in this tip is not OK. This one will do the job:

Sub SetFind2()
Dim c As Range
Set c = Cells.Find(What:="", LookIn:=xlValues, LookAt:=xlPart)
End Sub


2015-06-23 16:34:02

Nicole

Thanks for this. The first option works great, but when I tried it using the second option, I get an error that the "Object variable or With block variable not set." Any suggestions?

Sub SetFind2()
Dim c As Range
c = Cells.Find(What:="", LookIn:=xlValues, LookAt:=xlPart)
End Sub


2014-12-30 16:43:10

Martin Mirsky

This limitation of Excel has been an annoyance for years. SendKeys following the ActiveSheet command works on the macro sheet not the worksheet.

My way around this is using an old program called Keyboard Express, which is similar to the Sendkey command. The key series is assign to the shift-control-f for convenience.
Series used was:
<Cntl>f<Atl>hw<Shift><Tab<Shift><Tab>


2014-12-11 01:44:37

dmtk41

I've tried this code with excel 2013 but my excel become crash and not responding


2014-11-14 10:16:01

Willy Vanhaelen

Hold down Shift and click Find Next


2014-11-12 07:29:32

PYAR ALI

Question: "Ctrl+F" - can we expect excel to start search from the end of the sheet ?


2014-08-20 08:22:17

Kelly

THANK YOU!!!!!


This Site

Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.

Newest Tips
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.