Как да намеря и заменя всички празни клетки с определено число или текст в Excel?
За диапазон от клетки, които са попълнени с няколко празни клетки, може да се наложи да намерите тези празни клетки и да ги замените с определено съдържание. В тази статия ви предлагаме три метода.
Намерете и заменете всички празни клетки с функцията за намиране и замяна
Намерете и заменете всички празни клетки с VBA код
Лесно попълнете всички празни клетки в диапазон с Kutools за Excel
Намерете и заменете всички празни клетки с функцията за намиране и замяна
Можете да използвате Търсене и заместване функция за замяна на всички празни клетки с определено съдържание в Excel. Моля, направете следното.
1. Изберете диапазона с празни клетки, които трябва да замените с определено съдържание, след което натиснете Ctrl + H клавиши едновременно, за да отворите диалоговия прозорец Търсене и замяна.
2. При изскачане Търсене и заместване диалогов прозорец, под Сменете раздела, запазете Намерете това, празно поле, въведете конкретния текст, в който искате да замените празните клетки Заменете със и накрая щракнете върху Замести всички бутон. Вижте екранна снимка:
3. Щракнете върху OK бутон в следния диалогов прозорец.
Тогава всички празни клетки в избрания диапазон се заменят с определено съдържание.
Лесно попълнете всички празни клетки с определена стойност в Excel:
Kutools за Excel's Попълване на празни клетки помощната програма ви помага лесно да попълните всички празни клетки в избрания диапазон с определено число или текст в Excel, както е показано в демонстрацията по-долу.
Изтеглете и опитайте сега! (30-дневна безплатна пътека)
Намерете и заменете всички празни клетки с VBA код
Можете също да приложите метода VBA, за да замените всички празни клетки с определено съдържание в диапазон. Моля, направете следното.
1. Натисни Друг + F11 клавиши едновременно, за да отворите Microsoft Visual Basic за приложение прозорец.
2. В Microsoft Visual Basic за приложение прозорец, кликнете Поставете > Модулии след това копирайте и поставете под VBA кода в прозореца на модула.
VBA код: Заменете празните клетки с определено съдържание
Sub Replace_Blanks()
Dim xStr As String
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = xRg.SpecialCells(xlBlanks)
If (Err <> 0) Or (xRg Is Nothing) Then
MsgBox "No blank cells found", , "Kutools for Excel"
Exit Sub
End If
xStr = Application.InputBox("Replace blank cells with what?", "Kutools for Excel")
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
xCell.Formula = xStr
Next
Application.ScreenUpdating = xUpdate
End Sub3. Натисни F5 ключ за изпълнение на кода. В Kutools за Excel изберете диапазона с празни клетки, които трябва да намерите и замените, след което щракнете върху OK бутон.
4. В друг Kutools за Excel диалогов прозорец, въведете определено съдържание в текстовото поле и щракнете върху OK бутон. Вижте екранна снимка:
След това всички празни клетки се заменят незабавно с определен текст, както сте посочили по-горе.
Забележка: Ако избраният диапазон не съдържа празни клетки, ще получите следния диалогов прозорец.
Лесно попълнете всички празни клетки в диапазон с Kutools за Excel
- Попълване на празни клетки полезност на Kutools за Excel ви помага лесно да попълните всички празни клетки с определено съдържание. Моля, направете следното.
Преди да кандидатствате Kutools за Excel, Моля те първо го изтеглете и инсталирайте.
1. Изберете диапазона с празни клетки, които трябва да попълните с определено съдържание, и след това щракнете Kutools > Поставете > Попълване на празни клетки.
2. В Попълване на празни клетки диалоговия прозорец, проверете Фиксирана стойност опция в Попълнете с и след това въведете определено съдържание в Попълнена стойност кутия, накрая щракнете върху OK бутон.
След това всички празни клетки в избрания диапазон се запълват със съдържанието, както е показано на екранната снимка по-долу.
Забележка: С тази помощна програма можете също да попълвате празни клетки въз основа на стойности и да попълвате празни места с линейни стойности.
Ако искате да имате безплатен пробен период (30 дни) на тази помощна програма, моля, щракнете, за да го изтеглитеи след това преминете към прилагане на операцията съгласно горните стъпки.
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
