Как да премахнете условното форматиране в Excel (3 примера)

Hugh West

16-06-2023 Основи на Excel
  • Споделя Това
Hugh West

В Excel, Условно форматиране е удобна функция, която ви позволява безпроблемно да форматирате и засенчвате клетки въз основа на определени условни критерии. Понякога обаче може да пожелаете да изтриете или изчистите условното форматиране в Excel. В този урок ще ви обясним как да премахнете Условно форматиране по различни начини, включително чрез функцията Clear Rules и прилагането на VBA .

Изтегляне на работна тетрадка за практика

Изтеглете тази учебна тетрадка, за да се упражнявате, докато четете тази статия.

Премахване на Formatting.xlsm

3 примера за премахване на условното форматиране в Excel

Примерен набор от данни за средните годишни заплати в Google няколко отдела са показани на снимката по-долу. Подчертахме доходите със средна заплата над $120,000 използване на Условно форматиране . Въпреки това може да се наложи да премахнете условното форматиране, след като го приложите.

Ще ви демонстрираме три различни начина за премахване на условното форматиране. Като начало ще използваме обичайния метод. След това, използвайки VBA код, ще премахнем условното форматиране, като същевременно ще оставим формата непокътнат.

1. Прилагане на основния метод за премахване на условното форматиране

В началото ще приложим C Правила на Уча.се команда за премахване на Условно форматиране . Това обикновено е основният метод за отстраняване на Условно форматиране . За да приложите тези методи, просто следвайте стъпките.

Стъпка 1:

  • Първо, изберете обхвата, в който сте приложили Условно форматиране .

Стъпка 2:

  • Кликнете върху Начало.

Стъпка 3:

  • Първо, щракнете върху Условно форматиране
  • Изберете Ясни правила
  • Накрая изберете Изчистване на правилата от избрани клетки от менюто.

  • Затова ще видите, че вашите Условно форматиране вече не присъства.

2. Изпълнение на код VBA за премахване на условното форматиране

В този раздел ще ви обясним как да използвате VBA код за премахване на Условно форматиране Това е уникален подход, но той работи. Защото можете просто да изберете диапазона и да премахнете условното форматиране, за да приложите същия код безброй пъти. VBA следвайте стъпките по-долу.

Стъпка 1:

  • Първо, натиснете Alt + F11 да активирате Работен лист с активирани макроси VBA .
  • Изберете Вмъкване на от раздела.
  • След това изберете Модул от опциите.

Стъпка 2:

  • След избора на Модул , просто поставете следното VBA. 
 Sub DeleteConditionalFormats() Dim WorkRng As Range On Error Resume Next xTitleId = "ExcelWIKI" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8) WorkRng.FormatConditions.Delete End Sub

Тук,

  • Dim WorkRng като обхват е декларирането на променливата WorkRng като стойност на диапазон.
  • xTitleId = "ExcelWIKI" е името на заглавието, което се появява в полето за въвеждане.
  • Задайте WorkRng = Application.Selection се отнася до обхвата, който ще бъде от текущия избор.
  • InputBox("Range", xTitleId, WorkRng.Address, Type:=8) се отнася до полето за въвеждане, което се появява, за да се получи обхватът, и е наречено със заглавието "ExcelWIKI".

WorkRng.FormatConditions.Delete се отнася за изтриване на всички условни формати между диапазона.

Стъпка 3:

  • Запазете програмата и натиснете F5 за да го стартирате.
  • Кутия за обхват 'ExelDemy' ще се появи, изберете обхвата.
  • Накрая натиснете Въведете за да видите промените.

Вследствие на това, Условно форматиране ще бъдат премахнати от клетките, както е показано на снимката по-долу.

Подобни четива

  • Как да премахнете грешката #DIV/0! в Excel (5 метода)
  • Премахване на панели в Excel (4 метода)
  • Как да премахнете хипервръзката от Excel (7 метода)
  • Премахване на отклоненията в Excel (3 начина)
  • Как да премахнете тиретата от SSN в Excel (4 бързи метода)

3. Изпълнете код VBA, за да премахнете условното форматиране, но да запазите формата

В допълнение към предишния метод можете лесно да премахнете Условно форматиране но запазвате формата, като използвате VBA По принцип функциите на Excel не позволяват това. VBA код ще ви позволи да постигнете това. Това е VBA превъзходството на кода над Функции на Excel . За да постигнете това, следвайте следните стъпки.

Стъпка 1:

  • За да отворите Макрос на VBA , натиснете Alt + F11 .
  • От разделите изберете Вмъкване на
  • След това изберете Модул .

Стъпка 2:

  • Вмъкнете следното VBA код. 
 Sub Remove_Condition_but_Keep_Format() Dim xRg As Range Dim xTxt As String Dim xCell As Range On Error Resume Next If ActiveWindow.RangeSelection.Count> 1 Then xTxt = ActiveWindow.RangeSelection.AddressLocal Else xTxt = ActiveSheet.UsedRange.AddressLocal End If Set xRg = Application.InputBox("Select range:", "ExcelWIKI", xTxt, , , , , 8) If xRg Is Nothing Then Exit Sub For Each xCell In xRgWith xCell .Font.FontStyle = .DisplayFormat.Font.FontStyle .Font.Strikethrough = .DisplayFormat.Font.Strikethrough .Interior.Pattern = .DisplayFormat.Interior.Pattern If .Interior.Pattern xlNone Then .Interior.PatternColorIndex = .DisplayFormat.Interior.PatternColorIndex .Interior.Color = .DisplayFormat.Interior.Color End If .Interior.TintAndShade = .DisplayFormat.Interior.TintAndShade.Interior.PatternTintAndShade = .DisplayFormat.Interior.PatternTintAndShade End With Next xRg.FormatConditions.Delete End Sub

Тук,

  • xRg като обхват се отнася до декларирането на xRg като диапазон.
  • xTxt като низ се отнася до декларирането на xTxt като низ.
  • xCell като обхват се отнася до xCell като диапазон.
  • При грешка възобнови Следваща се отнася до вашия код, който ще продължи да се изпълнява, дори ако възникне грешка.
  • RangeSelection.Count се отнася до избора на клетки в работния лист.
  • UsedRange.AddressLocal се отнася до използвания диапазон в посочения работен лист.
  • InputBox("Изберете диапазон:", "ExcelWIKI", xTxt, , , , , 8) е полето за въвеждане, в което ще въведете диапазона, когато се появи заглавието "ExcelWIKI".
  • .Font.FontStyle = .DisplayFormat.Font.FontStyle този шрифт ще остане като условно форматиране.
  • .Interior.PatternColorIndex = .DisplayFormat.Interior.PatternColorIndex която ще запази цвета на клетката като условно форматиране.
  • .Interior.TintAndShade = .DisplayFormat.Interior.TintAndShade командите, че вътрешната сянка и обектът ще останат като условно форматиране.

xRg.FormatConditions.Delete се отнася за изтриване на цялото условно форматиране за диапазона за стойността на низ в рамките на диапазона.

Стъпка 3:

  • Ще се появи диалогов прозорец, в който изберете обхвата.
  • Накрая щракнете върху ОК за да видите резултатите.

Следователно, Условно форматиране е изтрита в изображението по-долу, но форматът на клетката остава същият.

Прочетете още: Как да премахнете форматирането в Excel, без да премахвате съдържанието

Заключение

В заключение се надявам, че това ръководство ви е показало как да премахвате условно форматиране в Excel, като използвате както простия метод, така и кода VBA. Всички тези техники трябва да бъдат научени и използвани за вашите данни. Разгледайте книгата за упражнения и приложете наученото. Благодарение на вашия принос можем да подкрепяме проекти като този.

Моля, не се колебайте да се свържете с нас, ако имате някакви въпроси. Моля, оставете коментар по-долу, за да ми кажете какво мислите.

Exceldemy служителите ще отговорят на запитванията ви възможно най-бързо.

Предишна публикация Как да приложите формата на счетоводните числа в Excel (4 полезни метода)
Следваща публикация Как да слеете пощенски етикети от Excel в Word (с лесни стъпки)

Хю Уест е опитен обучител и анализатор на Excel с над 10 години опит в индустрията. Има бакалавърска степен по счетоводство и финанси и магистърска степен по бизнес администрация. Хю има страст към преподаването и е разработил уникален подход на преподаване, който е лесен за следване и разбиране. Неговите експертни познания по Excel са помогнали на хиляди студенти и професионалисти по целия свят да подобрят уменията си и да постигнат отлични резултати в кариерата си. Чрез своя блог Хю споделя знанията си със света, като предлага безплатни уроци за Excel и онлайн обучение, за да помогне на хората и фирмите да достигнат пълния си потенциал.