Note: The other languages of the website are Google-translated. Back to English

Hvordan ryddes indholdet af flere flettede celler i Excel?

Hvis du har et stort regneark, der indeholder flere flettede celler, og nu vil du rydde alt indholdet af de flettede celler, men beholde de flettede celler. Normalt kan du prøve at anvende Søg og erstat funktion for at vælge alle flettede celler først, og tryk derefter på Slette tast for at slette værdien, men du får dog en advarselsmeddelelse "Vi kan ikke gøre det mod en flettet celle". I dette tilfælde, hvordan rydder du værdierne i flettede celler, men efterlader de flettede celler hurtigt i Excel?

Ryd indholdet af flere flettede celler med VBA-kode

Ryd indholdet af flere flettede celler med Kutools til Excel


pil blå højre boble Ryd indholdet af flere flettede celler med VBA-kode

Dette afsnit, jeg kan oprette en VBA-kode til dig for at løse denne opgave, gør venligst som følger:

1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende kode i Moduler Vindue.

VBA: Ryd indholdet af flere flettede celler

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. Tryk derefter på F5 nøgle til at køre denne kode, og der vises et promptfelt for at minde dig om at vælge det område, du vil rydde de flettede celler, se skærmbillede:

doc ryd flettede celler 1

4. Og klik derefter på OK, indholdet i de flettede celler er ryddet med det samme og efterlader de tomme flettede celler, se skærmbillede:

doc ryd flettede celler 2


pil blå højre boble Ryd indholdet af flere flettede celler med Kutools til Excel

Hvis du har Kutools til Excel, Med Vælg Flettede celler værktøj, kan du vælge alle flettede celler i et valg med et enkelt klik og derefter slette dem på én gang.

Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. 

Efter installation Kutools til Excel, gør venligst som følger :( Gratis download Kutools til Excel nu )

1. Vælg det celleområde, der indeholder de flettede celler, du vil rydde indholdet.

2. Klik Kutools > Type > Vælg Flettede celler, se skærmbillede:

3. Og alle de flettede celler er valgt med det samme, se skærmbillede:

doc ryd flettede celler 4

4. Tryk derefter på Slette tasten på tastaturet, og alle værdierne i de flettede celler er valgt, men lad de flettede celler være som du har brug for.

Klik for at vide mere om dette værktøj Vælg sammenslåede celler ...

Gratis download Kutools til Excel nu


De bedste Office-produktivitetsværktøjer

Kutools til Excel løser de fleste af dine problemer og øger din produktivitet med 80%

  • Genbruge: Indsæt hurtigt komplekse formler, diagrammer og alt, hvad du har brugt før; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • Super formel bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
  • Flet celler / rækker / kolonner uden at miste data; Split celler indhold; Kombiner duplikerede rækker / kolonner... Forhindre duplikerede celler; Sammenlign områder...
  • Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
  • Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
  • Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
  • Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
  • Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Mere end 300 kraftfulde funktioner. Understøtter Office / Excel 2007-2019 og 365. Understøtter alle sprog. Nem implementering i din virksomhed eller organisation. Fuld funktioner 30-dages gratis prøveperiode. 60-dages pengene tilbage garanti.
kte-fane 201905

Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50% og reducerer hundredvis af museklik for dig hver dag!
officetab bund
Sorter kommentarer efter
Kommentarer (1)
Ingen vurderinger endnu. Vær den første til at bedømme!
Denne kommentar blev minimeret af moderatoren på webstedet
Kan du venligst give VBA-kode til at køre denne makro på tværs af hele projektmappen?
Der er endnu ingen kommentarer her
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder