Як знайти та замінити значення більше / менше, ніж певне значення в Excel?

Можливо, на вашому аркуші є кілька даних, тепер ви хочете знайти всі клітинки, що містять значення, яке перевищує або менше певного числа, а потім замінити їх іншим необхідним значенням відразу. Звичайна функція "Знайти та замінити" не застосовується для вирішення цієї проблеми. Чи є у вас якісь інші хороші поради щодо вирішення цього завдання?

Знайти та замінити значення більше / менше, ніж конкретне значення, кодом VBA

Знайдіть і замініть значення, більші / менші за конкретне значення, Kutools для Excel

Знайти та замінити значення більше / менше, ніж конкретне значення, кодом VBA

Наприклад, я знайду всі значення, які перевищують 500, і заміню їх на 0.

Наступний код VBA може допомогти вам замінити значення, більші або менші за певне значення, на одне, будь-ласка, виконайте наступне:

1. Утримуйте клавішу ALT + F11 і відкриває Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуліта вставте наступний код у Модулі Вікно

Код VBA: пошук і заміна значень, більших або менших за певне значення

Sub FindReplace()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Value > 500 Then
        Rng.Value = 0
    End If
Next
End Sub

3. Потім натисніть F5 клавішу для запуску цього коду та виберіть дані діапазону, які ви хочете замінити, із вікна запиту;

4. А потім клацніть OK, і ви можете бачити, що всі значення більше 500 були замінені на 0.

примітки: У наведеному вище коді ви можете змінити наступні змінні на потрібні.

• Якщо Rng.Value > 500 Потім
• Rng.Value = 0

Знайдіть і замініть значення, більші / менші за конкретне значення, Kutools для Excel

Якщо ви не знайомі з кодом, я можу поговорити про зручний інструмент- Kutools для Excel, З його Виберіть певні клітини Ви можете швидко вибрати потрібні комірки, а потім відразу замінити їх.

після установки Kutools для Excel, виконайте такі дії:

1. Виберіть діапазон даних, який потрібно знайти та замінити.

2. Клацання Кутулс > вибрати > Виберіть певні клітини, див. скріншот:

3, в Виберіть певні клітини діалогове вікно натисніть кнопку Осередок опція під Тип вибору, і вибрати Більш чим від Конкретний тип , і введіть значення, яке потрібно використовувати, крім того, у текстовому полі Більш чим, див. скріншот:

4. Потім натисніть OK кнопку, усі комірки, що перевищують 500, були негайно вибрані, потім введіть значення, яке потрібно замінити, та натисніть Ctrl + Enter клавіші разом, усі вибрані значення були замінені одночасно. Дивіться скріншоти:

примітки: В Виберіть певні клітини діалоговому вікні, ви можете використовувати інші критерії, такі як Менш, Так само, Містить, І так далі.

Завантажте та безкоштовну пробну версію Kutools для Excel зараз!

Демонстрація: знайти та замінити значення більше / менше, ніж певне значення, за допомогою Kutools для Excel

Статті по темі:

Як знайти та замінити точну відповідність у Excel?

Як замінити текст на відповідні картинки в Excel?

Як знайти та замінити колір заливки в Excel?

---

Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

• Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
• Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
• Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
• Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
• Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
• Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
• Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
• Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
• Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.

Детальніше ... Завантажити безкоштовно... Придбати ... 

---

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

• Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
• Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
• Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!

Детальніше ... Завантажити безкоштовно... Придбати ...