Hvordan finder jeg og erstatter alle tomme celler med bestemt antal eller tekst i Excel?
For en række celler, der er befolket med nogle tomme celler, skal du muligvis finde disse tomme celler og erstatte dem med bestemt indhold. I denne artikel giver vi tre metoder til dig.
Find og erstat alle tomme celler med funktionen Find og erstat
Find og erstat alle tomme celler med VBA-kode
Udfyld let alle tomme celler i et interval med Kutools til Excel
Find og erstat alle tomme celler med funktionen Find og erstat
Du kan bruge Søg og erstat funktion til at erstatte alle tomme celler med bestemt indhold i Excel. Gør som følger.
1. Vælg området med tomme celler, du skal erstatte med bestemt indhold, og tryk derefter på Ctrl + H taster samtidigt for at åbne dialogboksen Find og erstat.
2. I popping up Søg og erstat under dialogboksen udskifte fanen, hold Find hvad feltet tomt, indtast den bestemte tekst, du vil erstatte de tomme celler i Erstat med og klik til sidst på Erstat alle knap. Se skærmbillede:
3. Klik på OK i den følgende dialogboks.
Derefter erstattes alle tomme celler i det valgte område med bestemt indhold.
Udfyld let alle tomme celler med en bestemt værdi i Excel:
Kutools til Excel's Fyld tomme celler hjælpeprogram hjælper dig med nemt at udfylde alle tomme celler i det valgte område med bestemt antal eller tekst i Excel som nedenstående demo vist.
Download og prøv det nu! (30-dages gratis spor)
Find og erstat alle tomme celler med VBA-kode
Du kan også anvende VBA-metoden til at erstatte alle tomme celler med bestemt indhold i et interval. Gør som følger.
1. Tryk på andre + F11 taster samtidigt for at åbne Microsoft Visual Basic til anvendelse vindue.
2. i Microsoft Visual Basic til anvendelse vindue, skal du klikke på indsatte > Moduler, og kopier og indsæt derefter under VBA-kode i modulvinduet.
VBA-kode: Erstat tomme celler med bestemt indhold
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 Sub
3. Tryk på F5 nøgle for at køre koden. I Kutools til Excel i dialogboksen, vælg området med tomme celler, du skal finde og udskifte, og klik derefter på OK .
4. I en anden Kutools til Excel dialogboksen, skal du indtaste det bestemte indhold i tekstboksen og klikke på OK knap. Se skærmbillede:
Derefter erstattes alle tomme celler med en bestemt tekst med det samme som du angav ovenfor.
Bemærk: Hvis det valgte område ikke indeholder tomme celler, får du følgende dialogboks.
Udfyld let alle tomme celler i et interval med Kutools til Excel
Fyld tomme celler nytte af Kutools til Excel hjælper dig med nemt at udfylde alle tomme celler med bestemt indhold. Gør som følger.
Før påføring Kutools til Excel, Bedes download og installer det først.
1. Vælg området med tomme celler, du skal udfylde med bestemt indhold, og klik derefter på Kutools > indsatte > Fyld tomme celler.
2. i Fyld tomme celler dialogboksen, skal du kontrollere Fast værdi valgmulighed i Fyldt med sektion, og indtast derefter det bestemte indhold i Fyldt værdi Klik på OK .
Derefter er alle tomme celler i det valgte område fyldt med indholdet som vist nedenstående skærmbillede.
Bemærk: Med dette værktøj kan du også udfylde tomme celler baseret på værdier og udfylde tomme felter med lineære værdier.
Hvis du vil have en gratis prøveperiode (30 dage) af dette værktøj, klik for at downloade det, og gå derefter til at anvende handlingen i henhold til ovenstående trin.
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
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!