Jak szybko znaleźć pozycję pierwszej wielkiej litery w ciągu tekstowym Excela?
Przypuśćmy, że istnieje lista ciągów tekstowych zmieszanych z cyframi, dużymi i małymi literami, jak szybko znaleźć pozycję pierwszej dużej litery na podstawie ciągów? W tym artykule przedstawię triki, które pozwalają szybko określić położenie pierwszej dużej litery bez ręcznego liczenia ich w programie Excel.
Znajdź pozycję pierwszej wielkiej litery w ciągu z formułą
Znajdź pozycję pierwszej wielkiej litery w ciągu za pomocą zdefiniowanej funkcji
Zmień wszystkie litery na WIELKIE LITERY lub Właściwy przypadek za pomocą Kutools for Excel
Znajdź pozycję pierwszej wielkiej litery w ciągu z formułą
Oto formuła, która pomoże Ci szybko znaleźć pozycję pierwszej wielkiej litery w ciągu znaków, wykonaj następujące czynności:
Wybierz pustą komórkę obok ciągu, w którym chcesz znaleźć pierwszą wielką literę, na przykład B1, wprowadź tę formułę =MIN(IF(ISERROR(FIND(CHAR(ROW(INDIRECT("65:90"))),A1)),"",FIND(CHAR(ROW(INDIRECT("65:90"))),A1)))
Naciśnij przycisk Shift + Ctrl + Enter aby uzyskać poprawny wynik, a następnie przeciągnij uchwyt automatycznego wypełniania nad komórki, które wymagały zastosowania tej formuły. Zobacz zrzut ekranu:
Znajdź pozycję pierwszej wielkiej litery w ciągu za pomocą zdefiniowanej funkcji
Poza formułą możesz również użyć funkcji Zdefiniowana, aby znaleźć pozycję pierwszej dużej litery w ciągu.
1. Włącz arkusz zawierający ciąg, w którym chcesz znaleźć wielkie litery, i naciśnij Alt + F11 klucze do otwarcia Microsoft Visual Basic for Applications okno.
2. Kliknij prawym przyciskiem myszy arkusz, w którym chcesz użyć kodu Projekt Eksploruj okienko i kliknij wstawka > Modułi wklej poniższy kod do pustego skryptu modułu. Zobacz zrzut ekranu:
Kod: znajdź pozycję pierwszej wielkiej litery z ciągu.
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. Zapisz kod i wróć do używanego arkusza i wybierz pustą komórkę obok ciągu, który chcesz znaleźć wielkimi literami, wprowadź tę formułę = GetFirstUpper (F1), naciśnij Wchodzę klucz, a następnie przeciągnij uchwyt autouzupełniania na komórki wymagające tej formuły. Zobacz zrzut ekranu:
Wskazówka: Jeśli w ciągu nie ma dużej litery, wynik jest wyświetlany jako -1.
Zmień wszystkie litery na WIELKIE LITERY lub Właściwy przypadek za pomocą Kutools for Excel
W ogólnych pracach z Excelem może być konieczna zmiana ciągów liter na WIELKIE LITERY, małe litery, małe litery, w zdaniu lub toGgLe CaSe, jak pokazano poniżej.
Z Kutools dla ExceMożesz zastosować to Zmień wielkość liter narzędzie do szybkiej zmiany wielkości liter według potrzeb.
Kutools dla programu Excel, ponad 300 przydatne funkcje, ułatwiają pracę. |
Po bezpłatna instalacja Kutools dla programu Excel, wykonaj poniższe czynności:
1. Wybierz łańcuchy, w których chcesz zmienić ich wielkość, i kliknij Kutools > Tekst > Zmień wielkość liter. Zobacz zrzut ekranu:
2. Następnie w poppingu Zmień wielkość liter zaznacz żądaną opcję w Zmień typ i możesz wyświetlić podgląd zmiany wyniku w okienku podglądu. Zobacz zrzut ekranu:
3. Następnie kliknij Ok or Aplikuj zmienić wielkość liter.
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!