Как да намерите и замените стойности, по-големи от / по-малки от определена стойност в Excel?

Може би във вашия работен лист има множество данни, сега искате да намерите всички клетки, които съдържат стойността, по-голяма или по-малка от определено число, и след това да ги замените с друга стойност, от която се нуждаете наведнъж. Нормалната функция за намиране и замяна не се прилага за решаване на този проблем, имате ли други добри предложения за справяне с тази задача?

Намерете и заменете стойности, по-големи от/по-малки от определена стойност с VBA код

Намерете и заменете стойности, по-големи от / по-малки от определена стойност с Kutools за Excel

Намерете и заменете стойности, по-големи от/по-малки от определена стойност с VBA код

Например, ще намеря всички стойности, които са по-големи от 500, и ще ги заменя с 0.

Следният VBA код може да ви помогне да замените стойностите, които са по-големи или по-малки от конкретна стойност, с единица, моля, направете следното:

1. Задръжте натиснат ALT + F11 ключове и отваря Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в Модули Window.

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. Щракнете Kutools > Изберете > Изберете конкретни клетки, вижте екранна снимка:

3. В Изберете конкретни клетки кликнете върху Клетка опция под Тип селекция, и изберете По-велик от от Специфичен тип падащо меню и въведете стойността, която искате да използвате в текстовото поле освен това По-велик от, вижте екранна снимка:

4, След това кликнете OK всички клетки, по-големи от 500, са избрани веднага, след това въведете стойността, с която трябва да замените, и натиснете Ctrl + Enter клавиши заедно, всички избрани стойности са заменени едновременно. Вижте екранни снимки:

Забележка: В Изберете конкретни клетки диалогов прозорец, можете да използвате други критерии, като напр По-малко от, Равно на, Съдържа, и така нататък.

Изтеглете и безплатна пробна версия Kutools за Excel сега!

Още по темата:

Как да намерите и замените точното съвпадение в Excel?

Как да замените текст със съответните картини в Excel?

Как да намеря и заменя цвета на запълване в Excel?