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 
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:
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
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:
Tip: Pokud v řetězci nejsou velká písmena, výsledek se zobrazí jako -1.
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.
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:
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:
3. Pak klikněte na tlačítko Ok or Podat žádost změnit případ.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
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!
