Когда вы используете команду «Найти», Excel по умолчанию использует «поиск по строкам» в качестве порядка, в котором он будет искать информацию. Однако ваши потребности могут отличаться; вам может потребоваться поиск по столбцам большую часть времени. Вы, конечно, можете изменить этот параметр при запуске поиска, но было бы неплохо изменить значение по умолчанию, чтобы Excel начинал поиск по столбцам?

К сожалению, нет настройки, которую можно указать, чтобы Excel запомнил, как вы хотите выполнять поиск. Однако вы можете использовать макрос, чтобы установить порядок поиска по умолчанию. Рассмотрим следующий пример:

Private Sub Workbook_Open()

On Error Resume Next     Cells.Find("", , , , xlByColumns, , , False) = True End Sub

Этот макрос ничего не делает, кроме изменения порядка поиска столбцов. После его запуска (другими словами, после того, как вы откроете книгу), последующие поиски по умолчанию будут выполняться по столбцу.

Тот факт, что Excel запоминает последний использованный порядок поиска для всех последующих поисков во время текущего сеанса Excel, может быть использован в ваших интересах. Следующий макрос делает то же самое, что и предыдущий пример, за исключением того, что он также закрывает книгу:

Sub Auto_Open()

Worksheets("sheet1").Cells.Find _       What:="", _       After:=ActiveCell, _       LookIn:=xlFormulas, _       LookAt:=xlWhole, _       SearchOrder:=xlByColumns, _       SearchDirection:=xlNext, _       MatchCase:=True

ThisWorkbook.Close savechanges:=False End Sub

Если вы поместите этот макрос в пустую книгу, а затем сохраните книгу в папке xlStart, она будет открываться каждый раз при запуске Excel.

При открытии книга выполняет один поиск с использованием нужных вам параметров, а затем закрывается. В конечном итоге ваш порядок поиска настроен на столбцы, и последующие поиски будут происходить так, как вы хотите.

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (3913) применим к Microsoft Excel 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Excel (Excel 2007 и более поздних версий) здесь:

link: / excelribbon-Searching_by_Columns_by_Default [Поиск по столбцам, по умолчанию].