Kako najti in nadomestiti vse prazne celice z določeno številko ali besedilom v Excelu?
Za vrsto celic, ki so poseljene z nekaj praznimi celicami, boste morda morali poiskati te prazne celice in jih nadomestiti z določeno vsebino. V tem članku vam ponujamo tri metode.
Poiščite in zamenjajte vse prazne celice s funkcijo Najdi in zamenjaj
Poiščite in zamenjajte vse prazne celice s kodo VBA
Preprosto izpolnite vse prazne celice v obsegu s Kutools za Excel
Poiščite in zamenjajte vse prazne celice s funkcijo Najdi in zamenjaj
Lahko uporabite Poišči in zamenjaj funkcija za nadomestitev vseh praznih celic z določeno vsebino v Excelu. Naredite naslednje.
1. Izberite obseg s praznimi celicami, ki jih morate nadomestiti z določeno vsebino, in pritisnite Ctrl + H tipke hkrati, da odprete pogovorno okno Najdi in zamenjaj.
2. V pojavnem oknu Poišči in zamenjaj v pogovornem oknu pod Zamenjaj zavihek, obdržite Našli kaj polje prazno, vnesite določeno besedilo, ki ga želite nadomestiti s praznimi celicami Zamenjaj z in na koncu kliknite Zamenjaj vse . Oglejte si posnetek zaslona:
3. Kliknite OK v naslednjem pogovornem oknu.
Nato se vse prazne celice v izbranem obsegu nadomestijo z določeno vsebino.
Preprosto izpolnite vse prazne celice z določeno vrednostjo v Excelu:
Kutools za Excel's Izpolnite prazne celice pripomoček vam pomaga enostavno izpolniti vse prazne celice v izbranem obsegu z določeno številko ali besedilom v Excelu, kot je prikazano spodaj.
Prenesite in preizkusite zdaj! (30-dnevna brezplačna pot)
Poiščite in zamenjajte vse prazne celice s kodo VBA
Način VBA lahko uporabite tudi za nadomestitev vseh praznih celic z določeno vsebino v obsegu. Naredite naslednje.
1. Pritisnite druga + F11 tipke hkrati, da odprete Microsoft Visual Basic za uporabo okno.
2. V Ljubljani Microsoft Visual Basic za uporabo okno, kliknite Vstavi > Moduliin nato kopirajte in prilepite spodnjo kodo VBA v okno modula.
Koda VBA: prazne celice zamenjajte z določeno vsebino
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. Pritisnite F5 tipko za zagon kode. V Kutools za Excel v pogovornem oknu izberite obseg s praznimi celicami, ki jih želite najti in zamenjati, nato pa kliknite OK gumb.
4. V drugem Kutools za Excel pogovorno okno, vnesite določeno vsebino v besedilno polje in kliknite OK . Oglejte si posnetek zaslona:
Nato se vse prazne celice takoj nadomestijo z določenim besedilom, kot ste določili zgoraj.
Opombe: Če izbrani obseg ne vsebuje praznih celic, se prikaže naslednje pogovorno okno.
Preprosto izpolnite vse prazne celice v obsegu s Kutools za Excel
O Izpolnite prazne celice uporabnost Kutools za Excel vam pomaga enostavno izpolniti vse prazne celice z določeno vsebino. Naredite naslednje.
Pred vložitvijo vloge Kutools za ExcelProsim najprej ga prenesite in namestite.
1. Izberite obseg s praznimi celicami, ki jih morate zapolniti z določeno vsebino, in kliknite Kutools > Vstavi > Izpolnite prazne celice.
2. V Ljubljani Izpolnite prazne celice pogovorno okno, preverite Fiksna vrednost možnost v Napolni z in nato vnesite določeno vsebino v Izpolnjena vrednost polje, končno kliknite OK gumb.
Nato se vse prazne celice v izbranem obsegu napolnijo z vsebino, kot je prikazano spodaj.
Opombe: S tem pripomočkom lahko izpolnite tudi prazne celice na podlagi vrednosti in praznine z linearnimi vrednostmi.
Če želite imeti brezplačno (30-dnevno) preskusno različico tega pripomočka, kliknite, če ga želite prenestiin nato nadaljujte z uporabo postopka v skladu z zgornjimi koraki.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!