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

Jak rychle najít pozici prvního velkého písmene v textovém řetězci aplikace Excel?

Předpokládejme, že existuje seznam textových řetězců smíšených s čísly, velkými a malými písmeny, jak můžete rychle najít pozici prvního velkého písmene z řetězců? V tomto článku představuji triky, které dokážou rychle určit pozici prvních velkých písmen, aniž by je v aplikaci Excel počítaly jeden po druhém.

Najděte pozici prvního velkého písmene v řetězci pomocí vzorce

Najděte pozici prvních velkých písmen v řetězci pomocí definované funkce

Změňte všechna písmena na velká písmena nebo správná velká písmena pomocí Kutools pro Excel dobrý nápad3


šipka modrá pravá bublina Najděte pozici prvního velkého písmene v řetězci pomocí vzorce

Zde je vzorec, který vám pomůže rychle najít pozici prvního velkého písmene v řetězci, postupujte takto:

Vyberte prázdnou buňku vedle řetězce, který chcete najít první velká písmena, například B1, zadejte tento vzorec =MIN(IF(ISERROR(FIND(CHAR(ROW(INDIRECT("65:90"))),A1)),"",FIND(CHAR(ROW(INDIRECT("65:90"))),A1)))

Stisknout Shift + Ctrl + Enter klávesu, abyste získali správný výsledek, a poté přetáhněte úchyt automatického vyplňování přes buňky, které potřebovaly k použití tohoto vzorce. Viz snímek obrazovky:
doc najít pozici prvního velkého písmene 1


šipka modrá pravá bublina Najděte pozici prvních velkých písmen v řetězci pomocí definované funkce

Kromě vzorce můžete také použít definovanou funkci ke zjištění polohy prvních velkých písmen v řetězci.

1. Povolte list obsahující řetězec, který chcete najít, velká písmena, a stiskněte Alt + F11 klíče k otevření Microsoft Visual Basic pro aplikace okno.

2. klikněte pravým tlačítkem na list, ve kterém chcete použít kód Prozkoumejte projekt v podokně a klikněte na Vložit > Modula vložte níže uvedený kód do prázdného skriptu modulu. Viz snímek obrazovky:

Kód: Najděte pozici prvního velkého písmene z řetězce.

Function GetFirstUpper(Rg As Range) As Integer
'UpdatebyExtendoffice20160726
    Dim xStr As String
    Dim I As Integer
    Application.Volatile
    GetFirstUpper = -1
    On Error Resume Next
    xStr = Trim(Rg.Value)
    For I = 1 To Len(xStr)
        If (Asc(Mid(xStr, I, 1)) < 91) And (Asc(Mid(xStr, I, 1)) > 64) Then
            GetFirstUpper = I
            Exit Function
        End If
    Next
End Function

doc najít pozici prvního velkého písmene 5

3. Uložte kód a vraťte se na list, který používáte, a vyberte prázdnou buňku vedle řetězce, který chcete najít velká, zadejte tento vzorec = GetFirstUpper (F1), lis vstoupit klíč a poté přetáhněte popisovač automatického vyplňování přes buňky potřebné pro tento vzorec. Viz snímek obrazovky:
doc najít pozici prvního velkého písmene 6

Tip: Pokud v řetězci nejsou velká písmena, výsledek se zobrazí jako -1.


šipka modrá pravá bublina Změňte všechna písmena na velká písmena nebo velká písmena pomocí Kutools pro Excel

V obecné práci s Excelem obvykle budete muset změnit řetězce písmen na UPPERCAE, Správná písmena, Malá písmena, Věta vět nebo ToGgLe CaSe, jak je ukázáno níže.
doc najít pozici prvního velkého písmene 2

S Kutools pro Excel, můžete použít jeho Změnit případ nástroj pro rychlou změnu velkých a malých písmen, jak potřebujete.

Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. 

Po instalace zdarma Kutools pro Excel, prosím, postupujte takto:

1. Vyberte řetězce, u kterých chcete změnit jejich případy, a klepněte na Kutools > text > Změnit případ. Viz snímek obrazovky:
doc najít pozici prvního velkého písmene 3

2. Pak v praskání Změnit případ v dialogovém okně zaškrtněte požadovanou možnost v Změnit typ a v podokně náhledu si můžete zobrazit náhled měnícího se výsledku. Viz snímek obrazovky:
doc najít pozici prvního velkého písmene 4

3. Pak klikněte na tlačítko Ok or aplikovat změnit případ.

stahování dokumentů 1


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-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné 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 snižuje stovky kliknutí myší každý den!
officetab dno
Komentáře (3)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Dobrý den,
Můžete mi prosím pomoci pochopit, proč jste použili NEPŘÍMÝ("65:90").? Co znamená „65:90“?
Tento komentář byl moderátorem webu minimalizován
65 až 90 je kód pro velká písmena, takže tento kód kontroluje, jaká je pozice znakového kódu v tomto rozsahu
Tento komentář byl moderátorem webu minimalizován
Navrhoval bych použít nový CHAR(SEQUENCE(26, 1, 65)) místo CHAR(ŘÁDEK(NEPŘÍMÉ("65:90"))), pokud můžete, nový kód je srozumitelnější a přináší mi méně problémů s automatickým tabulky
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL