Вы, наверное, уже знаете, что можете выбрать все ячейки, содержащие формулы на листе, нажав F5 и выбрав Special | Формулы. Если вам нужно постоянно следить за тем, где расположены формулы, то многократный выбор может оказаться утомительным. Лучшее решение — использовать возможности условного форматирования Excel для выделения ячеек с формулами.

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

Function HasFormula(rCell As Range) As Boolean     Application.Volatile     HasFormula = rCell.HasFormula End Function

Чтобы использовать это с условным форматированием, выберите ячейки, которые нужно проверить, и выполните следующие действия:

  1. Выберите «Условное форматирование» в меню «Формат». Excel отображает диалоговое окно «Условное форматирование».

  2. Убедитесь, что первый раскрывающийся список — это «Формула». (См. Рис. 1.)

  3. В области формулы введите «= HasFormula (A1)» (без кавычек). Если активная ячейка в выбранном диапазоне не является ячейкой A1, вам необходимо немного изменить формулу, чтобы отразить активную ячейку.

  4. Нажмите кнопку «Форматировать». Excel отображает диалоговое окно «Формат ячеек».

(См. Рис. 2.)

  1. Используйте элементы управления в диалоговом окне «Формат ячеек», чтобы указать способ форматирования ячеек.

  2. Нажмите кнопку ОК, чтобы закрыть диалоговое окно Формат ячеек.

  3. Нажмите кнопку ОК, чтобы закрыть диалоговое окно «Условное форматирование».

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

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

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

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

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

link: / excelribbon-Conditionally_Highlighting_Cells_Contain_Formulas [Условное выделение ячеек, содержащих формулы].