Reply to thread

Message: [QUOTE="Tim Childs, post: 7409250"] Hi Ben Thanks for getting back with a solution. Have incorporated it and it is working fine Am grateful for your help Tim Tim, The only workaround that I'm aware of outside of add-ins or complex find macros is to use SendKeys. It is not ideal, as this method is not very consistent. Still, using Excel 2010 with the following code in my ThisWorkbook module successfully set the Find option to Within Workbook. Note that if it does not work for you, you may need to note each keystroke that you use to perform the task and adjust the macro accordingly. Ben Private Sub Workbook_Open() Application.SendKeys ("^f{tab}{enter}{tab}{tab}{down}{down}{tab}{tab}{tab}{tab}{tab}{tab}{tab}{tab}{enter}") End Sub [/QUOTE]