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

Jak zvýraznit konkrétní text v buňce na základě jiného textu?

V aplikaci Excel může být pro nás snadné zvýraznit buňky na základě konkrétního textu, ale zde chci zvýraznit konkrétní text v buňce, aby byl vynikající, ale ne celá buňka. To může být pro většinu z nás nepříjemné. V tomto článku budu hovořit o některých tricích pro řešení této úlohy v aplikaci Excel.


Zvýrazněte jeden nebo více konkrétních textů ve více buňkách pomocí kódu VBA

Například mám řadu textových řetězců a teď chci zvýraznit konkrétní text “Nebe”V těchto buňkách získáte výsledek jako následující snímky obrazovky:

Chcete-li zvýraznit pouze část textu v buňce, může vám pomoci následující kód VBA.

1. Vyberte buňky, u kterých chcete zvýraznit konkrétní text, a poté podržte klávesu ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula vložte následující kód do Modul Okno.

Kód VBA: Zvýrazněte část textu v buňce:

Sub HighlightStrings()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp As String
Dim x As Long
Dim m As Long
Dim y As Long
cFnd = InputBox("Enter the text string to highlight")
y = Len(cFnd)
For Each Rng In Selection
  With Rng
    m = UBound(Split(Rng.Value, cFnd))
    If m > 0 Then
      xTmp = ""
      For x = 0 To m - 1
        xTmp = xTmp & Split(Rng.Value, cFnd)(x)
        .Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
        xTmp = xTmp & cFnd
      Next
    End If
  End With
Next Rng
Application.ScreenUpdating = True
End Sub

3. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a zobrazí se okno s výzvou, které vám připomene zadání textu, který chcete pouze zvýraznit, viz screenshot:

4. A pak klikněte na tlačítko OK tlačítko, veškerý zadaný text byl zvýrazněn pouze v buňkách, viz screenshot:

Tipy: Pokud potřebujete zvýraznit více klíčových slov z textových řetězců, použijte následující kód:
Kód VBA: Zvýrazněte více klíčových slov z textových řetězců:
Sub HighlightStrings()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp As String
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum As Integer
Dim xArrFnd As Variant
Dim xStr As String
cFnd = InputBox("Please enter the text, separate them by comma:")
If Len(cFnd) < 1 Then Exit Sub
xArrFnd = Split(cFnd, ",")
For Each Rng In Selection
With Rng
For xFNum = 0 To UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Len(xStr)
m = UBound(Split(Rng.Value, xStr))
If m > 0 Then
xTmp = ""
For x = 0 To m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
Next
End If
Next xFNum
End With
Next Rng
Application.ScreenUpdating = True
End Sub

Potom do rozbalovacího pole zadejte klíčová slova, která chcete zvýraznit (oddělte slova čárkou), viz screenshot:

A pak klikněte OK tlačítko, zadaná slova byla zvýrazněna najednou, viz screenshoty:

Poznámka: Výše ​​uvedené kódy rozlišují velká a malá písmena.


Zvýrazněte jeden nebo více konkrétních textů ve více buňkách pomocí úžasné funkce

Pokud nejste obeznámeni s kódem v aplikaci Excel, představím zde jednoduchý nástroj - Kutools pro Excel, S jeho Označit klíčové slovo můžete v buňkách zvýraznit konkrétní jedno nebo více klíčových slov najednou.

Poznámka:Chcete-li je použít Označit klíčové slovo funkce, za prvé, měli byste si stáhnout Kutools pro Excela poté rychle a snadno aplikujte funkce.

Po instalaci Kutools pro Excel, postupujte následovně:

1, klikněte Kutools > text > Označit klíčové slovo, viz screenshot:

2. V Označit klíčové slovo V dialogovém okně proveďte následující operace:

  • V části vyberte rozsah dat, který chcete použít Rozsah Textové pole;
  • Vyberte buňky obsahující klíčová slova, která chcete zvýraznit, klíčová slova můžete také zadat ručně (oddělená čárkou) do Klíčové slovo Textové pole
  • Nakonec byste měli určit barvu písma pro zvýraznění textů zaškrtnutím Označte barvy klíčových slov volba. (Chcete-li vybarvit celé buňky obsahující klíčová slova, vyberte Označte barvy obsahu buňky volitelný)

3. Potom klepněte na tlačítko Ok tlačítko, všechny zadané texty byly zvýrazněny, jak je uvedeno níže:

Poznámka: Tato funkce nerozlišuje velká a malá písmena, pokud chcete zvýraznit text s malými a velkými písmeny, zkontrolujte Zápas Case v Označit klíčové slovo dialogové okno.


Zvýrazněte konkrétní text v buňce na základě jiného textu pomocí kódu VBA

Tady je další situace, mám dva sloupce, jejichž první sloupec obsahuje textové řetězce a druhý sloupec je specifický text, nyní musím zvýraznit relativní text v prvním sloupci na základě konkrétního textu ve druhém sloupci pro každý řádek.

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula vložte následující kód do Modul Okno.

Kód VBA: Zvýrazněte část textu v buňce na základě jiného textu:

Sub highlight()
'Updateby Extendoffice
    Dim xStr As String
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim xChar As String
    Dim I As Long
    Dim J As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
LInput:
    Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "not support multiple columns"
        GoTo LInput
    End If
    If xRg.Columns.Count <> 2 Then
        MsgBox "the selected range can only contain two columns "
        GoTo LInput
    End If
    For I = 0 To xRg.Rows.Count - 1
        xStr = xRg.Range("B1").Offset(I, 0).Value
        With xRg.Range("A1").Offset(I, 0)
            .Font.ColorIndex = 1
            For J = 1 To Len(.Text)
                If Mid(.Text, J, Len(xStr)) = xStr Then .Characters(J, Len(xStr)).Font.ColorIndex = 3
            Next
        End With
    Next I
End Sub

3. Po vložení kódu stiskněte a stiskněte F5 po jeho spuštění se zobrazí okno s výzvou, které vám připomene výběr rozsahu dat, který obsahuje textový řetězec a konkrétní text, který chcete zvýraznit, a na základě, viz screenshot:

4. A pak klikněte na tlačítko OK Tlačítko, veškerý odpovídající text v prvním sloupci na základě konkrétního textu ve druhém sloupci byl zbarven červeně jako následující snímek obrazovky:


Více relativních článků:

  • Tučný text části při zřetězení dvou sloupců v aplikaci Excel
  • V listu aplikace Excel po zřetězení dvou hodnot buněk pomocí vzorců zjistíte, že nebude tučnou částí textu v buňce kombinovaného vzorce. To může být někdy nepříjemné, jak byste mohli tučným textem části při zřetězení dvou sloupců v aplikaci Excel?
  • Zřetězte sloupce buněk a udržujte barvu textu v aplikaci Excel
  • Jak všichni víme, při zřetězení nebo kombinování sloupců buněk do jednoho sloupce dojde ke ztrátě formátování buňky (jako je barva písma textu, formátování čísel atd.). V tomto článku představím několik triků, jak kombinovat sloupce buněk do jednoho a co nejsnadněji zachovat barvu textu v aplikaci Excel.
  • Zobrazit konkrétní text na základě hodnot v jiném sloupci
  • Předpokládám, že mám seznam čísel, nyní chci zobrazit nějaký konkrétní text v jiném sloupci na základě čísel tohoto sloupce. Například pokud je číslo buňky mezi 1–100, chci, aby se v sousední buňce zobrazil text „Zmenšit“, pokud je číslo mezi 101-200, zobrazí se text „Stabilní“ a pokud je číslo větší než 200 , zobrazí se text „Zvětšit“ jako následující snímek obrazovky. Při řešení tohoto úkolu v aplikaci Excel vám mohou pomoci následující vzorce v tomto článku.
  • Součet buněk s textem a čísly v aplikaci Excel
  • Například mám seznam hodnot obsahujících číselné a textové řetězce, nyní chci sčítat pouze čísla založená na stejném textu, podívejte se na následující snímek obrazovky. Za normálních okolností nemůžete hodnoty v seznamu sečíst přímo textovým řetězcem, zde vám představím několik vzorců pro řešení tohoto úkolu.

Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2019 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Kompletní funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50% a omezuje stovky kliknutí myší každý den!
officetab dno
Komentáře (39)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Děkuji moc za váš tip a makra. Neumím si představit, co bych bez nich dělal.
Tento komentář byl moderátorem webu minimalizován
Zkontroloval jsem oba dané kódy v aplikaci Excel 2016, ale nefungují.
Tento komentář byl moderátorem webu minimalizován
Používal jsem Excel 365. První VBA nefunguje. Druhý nemůže zvýraznit správná klíčová slova, tj. nefunguje příliš
Tento komentář byl moderátorem webu minimalizován
Děkuji vám !!!
Tento komentář byl moderátorem webu minimalizován
Dostanu chybu a když ladím, zvýrazní tuto sekci m = UBound(Split(Rng.Value, cFnd))
Tento komentář byl moderátorem webu minimalizován
Fungovalo to pro mě skvěle, děkuji, že jste se o to podělili se světem.
Tento komentář byl moderátorem webu minimalizován
Může mi někdo pomoci s kódem pro "zkopírování těch zvýrazněných slov do jiného sloupce".
Tento komentář byl moderátorem webu minimalizován
jak mohu přimět tento kód, aby fungoval, ale aby byl zvýrazněn jinou barvou než červenou?
Tento komentář byl moderátorem webu minimalizován
Ahoj,
Pokud chcete zvýraznit text jinou barvou, stačí změnit číslo indexu barev 3 na jiné číslo indexu barev v níže uvedeném skriptu:
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3

Zkuste to prosím. Děkuji!
Tento komentář byl moderátorem webu minimalizován
Ahoj,
Se stejným makrem chci zvýraznit nějaký jiný text jinou barvou, např.: Zelená, prosím, pomozte mi s tím
Tento komentář byl moderátorem webu minimalizován
Ahoj Sukumare,
Omlouváme se, váš problém nelze vyřešit.
Prosím, komentujte zde, pokud má někdo jiné řešení.
Děkuji!
Tento komentář byl moderátorem webu minimalizován
Děkujeme za "Zvýraznění konkrétního textu ve více buňkách pomocí kódu VBA" Funguje to skvěle. Mohl byste prosím vysvětlit:
řádek 18 xTmp = xTmp & Split(Rng.Value, cFnd)(x)
Proč se idoes „(x)“ musí objevit tam, kde je? Je hodnota x předána funkci Split jako pojmenovaný argument bez názvu? Opravdu bych rád porozuměl tomuto konceptu. Děkuji za vaši pomoc a tuto funkci. Naučil jsem se něco, co jsem nevěděl.
Tento komentář byl moderátorem webu minimalizován
ahoj, všiml jsem si, že se jedná o highliter citlivý na malá a velká písmena. Kde mohu změnit, že by to zvýraznilo malá a velká písmena v deired slově
Tento komentář byl moderátorem webu minimalizován
Ahoj, lolstere,

Ve výše uvedených dvou kódech, který kód chcete rozlišovat mezi malými a velkými písmeny?
Kód vám upravíme!
Tento komentář byl moderátorem webu minimalizován
Ahoj, rád bych se zeptal na stejnou otázku, abych zvýraznil malá i velká písmena, v případě níže:

"najít a označit klíčové slovo1, klíčové slovo2 a klíčové slovo3 ve všech textových řetězcích, i když jeden řetězec obsahuje více než jedno z těchto klíčových slov (všechna z nich by měla být zvýrazněna v konkrétním textovém řetězci)"
Tento komentář byl moderátorem webu minimalizován
Sub HighlightStrings()
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp jako řetězec
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum jako celé číslo
Dim xArrFnd jako varianta
Dim xStr jako řetězec
cFnd = InputBox("Zadejte prosím text, oddělte je čárkou:")
Pokud Len(cFnd) < 1 Pak Exit Sub
xArrFnd = Split(cFnd, ",")
Pro každý Rng ve výběru
S Rng
Pro xFNum = 0 až UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Délka (xStr)
m = UBound(Split(Rng.Value, xStr))
Pokud m > 0 Pak
xTmp = ""
Pro x = 0 až m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
další
End If
Další xFNum
Konec s
Další Rng
Application.ScreenUpdating = True
End Sub
Tento komentář byl moderátorem webu minimalizován
Dobrý den, Mahendro
Pokud chcete, aby se v kódu nerozlišovala malá a velká písmena, použijte níže uvedený kód:
Sub HighlightStrings()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp As String
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum As Integer
Dim xArrFnd As Variant
Dim xStr As String
cFnd = InputBox("Please enter the text, separate them by comma:")
If Len(cFnd) < 1 Then Exit Sub
xArrFnd = Split(UCase(cFnd), ",")
For Each Rng In Selection
With Rng
For xFNum = 0 To UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Len(xStr)
m = UBound(Split(UCase(Rng.Value), UCase(xStr)))
If m > 0 Then
xTmp = ""
For x = 0 To m - 1
xTmp = xTmp & Split(UCase(Rng.Value), UCase(xStr))(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
Next
End If
Next xFNum
End With
Next Rng
Application.ScreenUpdating = True
End Sub


Zkuste to prosím, doufám, že vám to pomůže!
Tento komentář byl moderátorem webu minimalizován
Existuje způsob, jak vytvořit první kód VBA tak, aby fungoval s pevným seznamem klíčových slov bez pole výzvy? Například vždy chci najít a označit klíčové slovo1, klíčové slovo2 a klíčové slovo3 ve všech textových řetězcích, i když jeden řetězec obsahuje více než jedno z těchto klíčových slov (všechna z nich by měla být zvýrazněna v konkrétním textovém řetězci). A je možné udělat klíčové slovo1 a klíčové slovo 2 červené, ale třetí jen tučné?
Tento komentář byl moderátorem webu minimalizován
Dobrý den, Artursi,

Chcete-li zvýraznit více klíčových slov z buňky, může vám pomoci následující kód vba: (ve vyskakovacím vstupním poli byste měli slova oddělit středníkem)

Sub HighlightStrings()
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp jako řetězec
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum jako celé číslo
Dim xArrFnd jako varianta
Dim xStr jako řetězec
cFnd = InputBox("Zadejte prosím text, oddělte je středníkem:")
Pokud Len(cFnd) < 1 Pak Exit Sub
xArrFnd = Split(cFnd, ";")
Pro každý Rng ve výběru
S Rng
Pro xFNum = 0 až UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Délka (xStr)
m = UBound(Split(Rng.Value, xStr))
Pokud m > 0 Pak
xTmp = ""
Pro x = 0 až m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
další
End If
Další xFNum
Konec s
Další Rng
Application.ScreenUpdating = True
End Sub
Tento komentář byl moderátorem webu minimalizován
Ahoj Skyyang! Zjistil jsem, že při spuštění kódu by došlo k chybě - nemohl určit slovo za dvojtečkou. Máte nějaký návrh, jak to zlepšit? Děkuji mnohokrát!
Tento komentář byl moderátorem webu minimalizován
Dobrý den, IvyCY,
Pokud chcete slova specifikovat dvojtečkou, stačí změnit symbol středníku na dvojtečku, použijte prosím následující kód:

Sub HighlightStrings()
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp jako řetězec
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum jako celé číslo
Dim xArrFnd jako varianta
Dim xStr jako řetězec
cFnd = InputBox("Zadejte text, oddělte je dvojtečkou:")
Pokud Len(cFnd) < 1 Pak Exit Sub
xArrFnd = Split(cFnd, ":")
Pro každý Rng ve výběru
S Rng
Pro xFNum = 0 až UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Délka (xStr)
m = UBound(Split(Rng.Value, xStr))
Pokud m > 0 Pak
xTmp = ""
Pro x = 0 až m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
další
End If
Další xFNum
Konec s
Další Rng
Application.ScreenUpdating = True
End Sub
Tento komentář byl moderátorem webu minimalizován
Děkuji za odpověď, skyyang!

Ale stejně to nešlo.
Možná byla moje otázka dost matoucí. Příklad to může objasnit.
Jedním z mých klíčových slov je například „chránit“. Text v buňkách může být zobrazen jako „Naše způsoby, jak vyřešit problém: ochrana a blablabla...“ Mezi „:“ a „ochrana“ mohou být mezery, protože formátování textu není vždy stejné. Zde nemohlo být klíčové slovo „ochrana“ zvýrazněno výše uvedenými kódy. To je problém.

Zkoušel jsem to několikrát, ale neúspěšně. Uvažoval jsem také o odstranění interpunkce v buňkách, ale ohrozilo by to porozumění textům. Tak jsem položil otázku. Snad ti to nevadí.

Děkuji moc!

S pozdravem!
Tento komentář byl moderátorem webu minimalizován
Existuje způsob, jak odstranit všechna tato zvýrazněná slova?
Tento komentář byl moderátorem webu minimalizován
Ahoj Ace,
Chcete-li odstranit text založený na jiné buňce sloupce, může vám pomoci níže uvedený kód vba, zkuste to.
Sub DeleteStr()
Dim xStr jako řetězec
Dim xRg jako rozsah
Dim xTxt As String
Dim xCell As Range
Dim xChar As String
Dim i tak dlouho
Dim J As Long
On Error Resume Next
Pokud ActiveWindow.RangeSelection.Count > 1 Potom
xTxt = ActiveWindow.RangeSelection.AddressLocal
Jiný
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
LInput:
Set xRg = Application.InputBox("vyberte rozsah dat:", "Kutools pro Excel", xTxt, , , , , 8)
Pokud xRg není nic, pak Exit Sub
Pokud xRg.Areas.Count > 1 Potom
MsgBox "nepodporuje více sloupců"
Přejít na vstup LIN
End If
If xRg.Columns.Count <> 2 Then
MsgBox "vybraný rozsah může obsahovat pouze dva sloupce"
Přejít na vstup LIN
End If
Pro i = 0 To xRg.Rows.Count - 1
xStr = xRg.Range("B1").Offset(i, 0).Hodnota
S xRg.Range("A1").Offset(i, 0)
.Font.ColorIndex = 1
Pro J = 1 To Len(.Text)
If Mid(.Text, J, Len(xStr)) = xStr Then
.Znaky(J, Délka(xStr)).Smazat
End If
další
Konec s
Příště já
End Sub
Tento komentář byl moderátorem webu minimalizován
HI
Jsem pravidelným návštěvníkem vašeho webu. Vaše stránky jsou pro mě velmi užitečné. Tento kód změní barvu písma. Chci zvýraznit konkrétní slova (například Vložit, prázdné) žlutým pozadím. Chci to zdůraznit. Nejen barva písma. Pokračujte ve skvělé práci!!! Mnohokrát děkuji.
Tento komentář byl moderátorem webu minimalizován
Ahoj, Madhusudhanan,
Možná neexistuje žádný přímý způsob zvýraznění části textu v buňce s barvou pozadí v listu aplikace Excel.
Pokud máte jinou dobrou metodu, napište sem.
Tento komentář byl moderátorem webu minimalizován
při spuštění skriptu se zobrazí chyba při běhu '13', zadejte neshoda. nějaké návrhy?
Tento komentář byl moderátorem webu minimalizován
Měl jsem stejný problém; Zjistil jsem, že jeden z mých sloupců byly vzorce a hledal v nich, což spustilo chybu 13. Vybral jsem rozsah bez vzorce obsahujícího text ke zvýraznění a fungovalo to.
Tento komentář byl moderátorem webu minimalizován
Dobrý den,
mohl by mi někdo pomoci s následujícím

Moje buňky ve sloupci "G" obsahují text ze sloupce Z do AN, není povinné, aby sloupec g obsahoval veškerý text od Z do AN.

Moje práce je zvýraznit text ve sloupci G, pokud není dostupný v žádném ze sloupců Z - AN

Například: Buňka G1 obsahuje (Dobrý den, pane, mám se dobře), ale text "Pane" ve sloupci "Z1" až "AN1" neexistuje.

Takže musím zvýraznit text "Pane"
Tento komentář byl moderátorem webu minimalizován
Ahoj, pomozte mi s tím někdo. Chci zvýraznit konkrétní číslo v buňce ve stejné větě. například: "2 dny dovolené skenování" v této větě chcete zvýraznit číslo.
Tento komentář byl moderátorem webu minimalizován
Dobrý den,
Prosím, pomozte mi někdo. Chci zdůraznit konkrétní číslo ve stejné větě. Například: „Skenování 2 dnů dovolené“ chcete ve větě zvýraznit pouze „2“.
Tento komentář byl moderátorem webu minimalizován
Bylo to velmi užitečné, děkuji mnohokrát!
Tento komentář byl moderátorem webu minimalizován
Úžasný. dík
Tento komentář byl moderátorem webu minimalizován
Páni! Děkuji!
Zatím zde nejsou žádné komentáře
Načíst další
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění