Hvordan erstatte ikke-tomme celler med bestemt verdi i Excel?

In Excel, kan det Finn og erstatt-funksjonen hjelpe oss å finne alle de blank cellene og deretter erstatte dem med en angitt verdi som du vil.
1. Velg dataområdet som du vil erstatte bare verdi celler.
2. Og deretter trykker du Ctrl + H for å åpne Søk og erstatt dialogboksen i Finn og erstatt dialogen under kategorien Erstatt skriver du inn * i Søk etter-feltet, og angi verdien du trenger i Erstatt med tekstboks, se skjermbilde: < .no> 3. Deretter klikker du Erstatt alle-knappen, og en dialogboks popped ut å fortelle deg hvor mange celler som skal skiftes ut, lukke dialogboksene, da alle verdiene i det valgte området har blitt erstattet med spesifiserte data, kan du se skjermbilder:

Erstatt ikke tomme celler med bestemt verdi ved hjelp av VBA-kode
Ved hjelp av følgende VBA-kode, kan du også bytte ut alle datacellene dine nødvendige verdier på en gang. Vennligst gjør som dette:
1. Hold nede ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications vinduet.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window
VBA-kode. Sett ikke tomme celler med bestemte verdi
Sub ReplaceNumbers () 'Update 20141111 Dim SRG As Range Dim Rg As Range Dim Str As Variant On Error Resume Neste Sett SRG = Application.Selection Sett SRG = Application.InputBox ("velg range:", "Kutools for Excel", SRg.Address,,,,, 8) Hvis Err < > 0 Then Exit Sub Str = Application.InputBox ("Erstatt med:", "Kutools for Excel", Str) Hvis Str = False Then Exit Sub For Hver Rg I SRG Hvis Rg < > "" Så Rg = Str NextEnd Sub3. Deretter trykker F5 for å kjøre denne koden, og en rask boks vil komme ut for å minne deg velge et område som du ønsker å erstatte data, se skjermdump:
4. Klikk deretter på OK, og skriv inn bestemt verdi til neste teksten boksen, se skjermbilde:
5. Og klikk deretter på OK, har alle verdiene i din valgte området blitt erstattet med visse data på en gang. Anmeldelser