Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako barvati ali poudariti določeno besedo v celicah v Excelu?

Če celica vsebuje več besed, kako lahko označite določeno besedo samo v tej celici? In kako poudariti to določeno besedo v več celicah? Ta članek bo zagotovil metodo za dosego tega cilja.

Barva določene besede v eni sami celici / več celicah s kodo VBA


Preprosto poiščite in izberite vse celice, ki vsebujejo določeno besedilo ali del besedila:

O Izberite Specific Cells uporabnost Kutools za Excel vam lahko hitro pomaga najti in izbrati celice v razponu, če vsebujejo določeno besedilo ali del besedila. V pogovornem oknu bo prikazano skupno število celic. Prikaz slike:

Kutools za Excel vključuje več kot 300 priročno orodje Excel. Prosti brez omejitev v 30 dneh. Brezplačno prenesete zdaj


Barva določene besede v eni sami celici / več celicah s kodo VBA


Naslednja VBA koda vam lahko pomaga izbrati določeno besedo. Prosimo, naredite na naslednji način.

1. Izberite obseg vsebuje celice, v katere želite poudariti določeno besedo. Nato pritisnite druga + F11 tipke hkrati odpreti Microsoft Visual Basic za aplikacije okno.

2. V odprtju Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte in prilepite kodo VBA v okno Code.

VBA koda: Barva določene besede v celicah v Excelu

Sub HighlightStrings()
    Dim xHStr As String, xStrTmp As String
    Dim xHStrLen As Long, xCount As Long, I As Long
    Dim xCell As Range
    Dim xArr
    On Error Resume Next
    xHStr = Application.InputBox("What is the string to highlight:", "KuTools For Excel", , , , , , 2)
    If TypeName(xHStr) <> "String" Then Exit Sub
    Application.ScreenUpdating = False
        xHStrLen = Len(xHStr)
        For Each xCell In Selection
            xArr = Split(xCell.Value, xHStr)
            xCount = UBound(xArr)
            If xCount > 0 Then
                xStrTmp = ""
                For I = 0 To xCount - 1
                    xStrTmp = xStrTmp & xArr(I)
                    xCell.Characters(Len(xStrTmp) + 1, xHStrLen).Font.ColorIndex = 3
                    xStrTmp = xStrTmp & xHStr
                Next
            End If
        Next
    Application.ScreenUpdating = True
End Sub

3. Pritisnite F5 ključ za zagon kode. In v Kutools za Excel pogovorno okno, vnesite določeno besedo, ki jo označite v celicah, in nato kliknite OK gumb. Prikaz slike:

Nato lahko vidite, da so vse besede, ki ste jih navedli, v izbranih celicah rdeče barve rdeče, kot je prikazano spodaj.


Sorodni članki:


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Yuri Celis · 3 months ago
    Quisisera resaltar varias palabras al tiempo, como lo puedo hacer?
    • To post as a guest, your comment is unpublished.
      Eduardo M. · 1 months ago
      Eso es lo que estoy tratando de hacer tamiben (That is what I am trying to do as well)
  • To post as a guest, your comment is unpublished.
    Joe Rivas · 10 months ago
    THANKS, THANKS, THANKS
  • To post as a guest, your comment is unpublished.
    Otto · 1 years ago
    Is there any way to make the code highlight the words automatically as I edit the tabs?
    • To post as a guest, your comment is unpublished.
      crystal · 10 months ago
      Hi,
      Sorry can't help with this. Thanks for your comment.
  • To post as a guest, your comment is unpublished.
    Justin · 1 years ago
    You don't explain how to open the "Kutools for Excel dialog box" referred to in the last step.
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Dear Justin,
      Sorry about that. After pasting the VBA code into the Code window, please press the F5 key to run the code, and then he "Kutools for Excel" dialog box will be opened. Thank you.