Йозеф ищет способ изменить цвет фона определенных ячеек на созданном им листе. Например, он хотел бы найти все ячейки красного фона и изменить их на синий или найти все желтые фоны и изменить их на синий. Йозеф задается вопросом, есть ли простой способ сделать это.

Совершенно очевидно, что вы можете изменить цвет фона любых ячеек вручную, поэтому нет необходимости использовать эту опцию для внесения изменений. Что вам нужно сделать, так это использовать простой инструмент, такой как инструмент «Найти и заменить», чтобы изменить цвет. Выполните следующие действия:

  1. Нажмите Ctrl + H, чтобы открыть вкладку «Заменить» в диалоговом окне «Найти и заменить».

  2. Разверните диалоговое окно, нажав кнопку «Параметры». (См. Рис. 1.)

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

  4. Убедитесь, что выбрана вкладка «Заливка». (См. Рис. 2.)

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

  6. Щелкните ОК.

  7. Нажмите кнопку «Формат» справа от поля «Заменить на».

Excel отображает диалоговое окно «Заменить формат».

  1. Убедитесь, что выбрана вкладка «Заливка».

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

  3. Щелкните ОК.

  4. Щелкните «Заменить все».

Если вы обнаружите, что вам нужно снова и снова менять один и тот же цвет (например, всегда менять цвет с красного на синий), тогда вам может быть интересно использовать макрос для внесения изменений. Следующий пример можно назначить сочетанию клавиш или добавить на панель быстрого доступа, чтобы вы могли быстро ее использовать:

Sub ChangeColor()

Dim rCell As Range     If Selection.Cells.Count = 1 Then         MsgBox "Select the range to be processed."

Exit Sub     End If     For Each rCell In Selection         If rCell.Interior.Color = RGB(255, 0, 0) Then  'red             rCell.Interior.Color = RGB(0, 0, 255)      'blue         End If     Next rCell End Sub

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

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

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

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

Этот совет (9043) применим к Microsoft Excel 2007, 2010, 2013, 2016, 2019 и Excel в Office 365. Вы можете найти версию этого совета для старого интерфейса меню Excel здесь:

link: / excel-Replacing_Background_Colors_in_Cells [Замена цвета фона в ячейках].