Cum se șterge conținutul mai multor celule îmbinate în Excel?

Dacă aveți o foaie de lucru mare care conține mai multe celule îmbinate și acum, doriți să ștergeți tot conținutul celulelor îmbinate, dar să păstrați celulele îmbinate. În mod normal, puteți încerca să aplicați Găsiți și înlocuiți funcție pentru a selecta mai întâi toate celulele îmbinate, apoi apăsați Șterge pentru a șterge valoarea, cu toate acestea, veți primi un mesaj de avertizare "Nu putem face asta unei celule îmbinateÎn acest caz, cum ștergeți valorile din celulele îmbinate, dar lăsați celulele îmbinate rapid în Excel?

Ștergeți conținutul mai multor celule îmbinate cu codul VBA

Ștergeți conținutul mai multor celule îmbinate cu Kutools pentru Excel

Ștergeți conținutul mai multor celule îmbinate cu codul VBA

În această secțiune, vă pot crea un cod VBA pentru a rezolva această sarcină, vă rugăm să faceți următoarele:

1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. Clic Insera > Moduleși lipiți următorul cod în Module Fereastră.

VBA: ștergeți conținutul mai multor celule îmbinate

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. Apoi apăsați F5 tasta pentru a rula acest cod și se va afișa o casetă de prompt pentru a vă reaminti să selectați intervalul pe care doriți să ștergeți celulele îmbinate, vedeți captura de ecran:

4. Apoi faceți clic pe OK, conținutul din celulele îmbinate a fost șters imediat și lasă celulele goale îmbinate, vezi captura de ecran:

Ștergeți conținutul mai multor celule îmbinate cu Kutools pentru Excel

Dacă aveţi Kutools pentru Excel, Cu său Selectați celulele combinate utilitar, puteți selecta toate celulele îmbinate dintr-o selecție cu un singur clic, apoi le puteți șterge simultan.

După instalare Kutools pentru Excel, vă rugăm să faceți următoarele :( Descărcați gratuit Kutools pentru Excel acum )

1. Selectați gama de celule care conține celulele îmbinate pe care doriți să le ștergeți.

2. Clic Kutools > Selectați > Selectați celulele combinate, vezi captura de ecran:

3. Și toate celulele îmbinate au fost selectate imediat, vezi captura de ecran:

4. Apoi apăsați Șterge tasta de pe tastatură și toate valorile din celulele îmbinate au fost selectate, dar lăsați celulele îmbinate după cum aveți nevoie.

Faceți clic pentru a afla mai multe despre acest utilitar Selectați celule combinate ...

Descărcați gratuit Kutools pentru Excel acum