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

Excel: Hvis skriftfarven er rød, skal du returnere en bestemt tekst eller udføre andre handlinger

Hvordan kan du returnere en bestemt tekst, hvis skriftfarven er rød i en anden celle som vist nedenfor på skærmbilledet? I denne artikel vil jeg introducere nogle tricks til at udføre nogle handlinger baseret på den røde skrifttype i Excel.


Hvis skriftfarven er rød, skal du returnere specifik tekst i en anden celle

For at returnere en bestemt tekst, hvis skriftfarven er rød i en anden celle, skal du gøre følgende:

1. Trykke Alt + F11 taster samtidigt for at åbne Microsoft Visual Basic til applikationer vindue.

2. Klik derefter på indsatte > Moduler, kopier og indsæt nedenstående VBA-kode i vinduet.

VBA-kode: Hvis skriftfarven er rød, så returner specifik tekst

Function FontColorisRed(Rng As Range)
'Updateby ExtendOffice
    Application.Volatile
    If Rng.Font.ColorIndex = 3 Then
    FontColorisRed = "Fail"
    Else
    FontColorisRed = "Pass"
    End If
End Function
Bemærk: I ovenstående kode, hvis skriftfarven er rød, så returner teksten "Fail", hvis ikke rød, returner teksten "Pass”. Du kan ændre de to tekster efter dit behov.

3. Luk derefter kodevinduet og indtast denne formel: =SkriftfarveISRød(B2), og træk derefter udfyldningshåndtaget ned for at få de andre resultater, se skærmbillede:


Hvis skriftfarven er rød, skal du markere cellen

Hvis du ønsker at fremhæve cellerne baseret på den røde skrifttype, skal du gøre følgende:

1. Trykke Alt + F11 taster samtidigt for at åbne Microsoft Visual Basic til applikationer vindue.

2. Klik derefter på indsatte > Moduler, kopier og indsæt nedenstående VBA-kode i vinduet.

VBA-kode: Hvis skriftfarven er rød, skal du markere cellen

Function HighlightRedFont(pRg As Range) As Boolean
'Updateby ExtendOffice
Dim xRg As Range
Dim xBol As Boolean
xBol = False
    For Each xRg In pRg
        If xRg.Font.Color = vbRed Then
            xBol = True
        End If
    Next
  HighlightRedFont = xBol
End Function

3. Og luk derefter kodevinduet, gå til klik Hjem > Betinget formatering > Ny regel, se skærmbillede:

4. I poppet ud Ny formateringsregel i dialogboksen, skal du udføre følgende handlinger:

  • Klik på Brug en formel til at bestemme, hvilke celler der skal formateres i Vælg en regeltype listefelt;
  • Indtast denne formel =fremhævet skrifttype(B2) ind i Formater værdier, hvor denne formel er sand tekstboks;
  • Klik derefter på dannet .

5. I formater celler under dialogboksen Fyld fanen, vælg en farve, du vil fremhæve cellen, se skærmbillede:

6. Klik derefter på OK > OK for at lukke dialogboksene. Og nu er cellerne med rød skrift fremhævet på én gang, se skærmbillede:


Hvis skriftfarven er rød, skal du ændre skriftfarven

Nogle gange vil du måske ændre den røde skrifttype til en anden skriftfarve, her vil jeg tale om to metoder til at opnå det.

 Hvis skriftfarven er rød, så skift skriftfarven med funktionen Find og erstat

For at ændre den røde skriftfarve til en anden, kan funktionen Find og erstat i Excel gøre dig en tjeneste. Gør venligst med følgende trin:

1. Vælg det dataområde, som du vil ændre skriftfarven på, og tryk derefter på Ctrl + H nøgler til at åbne Søg og erstat dialog boks. Klik på i den åbnede dialog Indstillinger >> knap, se skærmbillede:

2. I den udvidede dialogboks skal du udføre følgende handlinger:

  • Forlad Find hvad og Erstat med kasser tomme;
  • På højre side af Find hvad felt, vælg dannet > Vælg Format fra celle, og klik på en celle med rød skrifttype;
  • Så på højre side af Erstat med felt, vælg dannet > dannet at gå til Udskift format dialogen.

3. I Udskift format under dialogboksen font fanen, skal du vælge en farve, som du vil ændre fra Farve rullemenu, se skærmbilleder:

4. Klik derefter på OK at lukke Udskift format dialog, og klik nu Erstat alle knappen i Søg og erstat dialogboksen, erstattes alle celler med rød skrift med den skriftfarve du har angivet, se skærmbillede:

Bemærk: Når du vælger format fra en eksisterende celle, vil alle formater af cellerne blive samlet op. I dette tilfælde, når du udfører Erstat, vil cellen ikke blive erstattet, hvis et format ikke matcher nøjagtigt.

 Hvis skriftfarven er rød, så skift skriftfarven med en nyttig funktion

Hvis du har Kutools til Excel, Med Vælg celler med format funktion, kan du vælge cellerne med rød skrift og derefter ændre skriftfarven til dit behov så hurtigt som muligt.

Efter installation Kutools til Excelskal du gøre som dette:

1. Vælg det dataområde, du vil bruge, og klik derefter Kutools > Type > Vælg celler med format, se skærmbillede:

2. I Vælg celler med format dialogboksen, klik Vælg Format fra celle knap. Og vælg derefter en celle med rød skrifttype, alle attributter for denne celle vises i listen nedenfor. Hvis du vil markere alle celler med nøjagtig samme formatering som basiscellen, skal du markere alle attributindstillinger; Hvis du bare vil markere cellerne med kun rød skrifttype, skal du fjerne markeringen i alle andre attributter undtagen font farve afkrydsningsfelt. Se skærmbillede:

3. Klik derefter på OK knappen, og klik i den følgende promptboks Ja, se skærmbillede:

4. Alle celler med rød skrifttype vælges på én gang, og derefter kan du angive en skriftfarve for at ændre den røde skrifttype efter behov. Se skærmbillede:



  • 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 og opbevaring af data; Split celler indhold; Kombiner duplikatrækker og sum / gennemsnit... 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 ...
  • Foretrukne og hurtigt indsætte formler, Områder, diagrammer og billeder; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • 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...
  • Pivottabelgruppering efter ugenummer, ugedag og mere ... Vis ulåste, låste celler ved forskellige farver; Fremhæv celler, der har formel / navn...
kte-fane 201905
  • 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 (0)
Ingen vurderinger endnu. Vær den første til at bedømme!
Der er endnu ingen kommentarer her
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder