Прескочи на основното съдържание

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

Автор: Xiaoyang Последна промяна: 2020-07-17

Ако имате голям работен лист, който съдържа множество обединени клетки, и сега искате да изчистите цялото съдържание на обединените клетки, но да запазите обединените клетки. Обикновено можете да опитате да приложите Търсене и заместване функция, за да изберете първо всички обединени клетки и след това натиснете Изтрий за да изтриете стойността, но ще получите предупредително съобщение "Не можем да направим това с обединена клетка". В този случай как да изчистите стойностите в обединените клетки, но да оставите обединените клетки бързо в Excel?

Изчистете съдържанието на множество обединени клетки с VBA код

Изчистете съдържанието на множество обединени клетки с Kutools за Excel


стрелка син десен балон Изчистете съдържанието на множество обединени клетки с VBA код

В този раздел мога да създам VBA код за вас, за да разрешите тази задача, моля, направете следното:

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

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

VBA: Изчистване на съдържанието на множество обединени клетки

Sub ClearMerged()
'updateby Extendoffice
    Dim Rg As Range, Rg1 As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set Rg = Application.InputBox("Please select the range of cells:", "Kutools for Excel", xAddress, , , , , 8)
    If Rg Is Nothing Then Exit Sub
    For Each Rg1 In Rg
        If Rg1.MergeCells Then Rg1.MergeArea.ClearContents
    Next
End Sub

3. След това натиснете F5 за да стартирате този код и ще изскочи поле за подкана, за да ви напомни да изберете диапазона, който искате да изчистите обединените клетки, вижте екранната снимка:

doc изчистване на обединени клетки 1

4, И после щракнете върху OK, съдържанието в обединените клетки е изчистено наведнъж и оставете празни обединени клетки, вижте екранната снимка:

doc изчистване на обединени клетки 2


стрелка син десен балон Изчистете съдържанието на множество обединени клетки с Kutools за Excel

Ако имате Kutools за Excel, Със своята Изберете Обединени клетки можете да изберете всички обединени клетки в селекция с едно щракване и след това да ги изтриете наведнъж.

Kutools за Excel : с повече от 300 удобни добавки за Excel, безплатни за изпробване без ограничение за 30 дни. 

След инсталиране Kutools за Excel, моля, направете следното:( Безплатно изтегляне Kutools за Excel сега )

1. Изберете диапазона от клетки, който съдържа обединените клетки, чието съдържание искате да изчистите.

2. Щракнете Kutools > Изберете > Изберете Обединени клетки, вижте екранна снимка:

3. И всички обединени клетки бяха избрани веднага, вижте екранната снимка:

doc изчистване на обединени клетки 4

4. След това натиснете Изтрий на клавиатурата и всички стойности в обединените клетки са избрани, но оставете обединените клетки както ви трябва.

Кликнете, за да научите повече за тази помощна програма Select Merged Cells...

Безплатно изтегляне Kutools за Excel сега

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Can you please provide VBA code to run this macro across the entire workbook?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations