Funkcja Excel VBA StrConv
Funkcja StrConv w VBA jest podzielona na funkcje tekstowe, które są funkcją konwersji, użycie tej funkcji polega na tym, że zmienia wielkość liter w ciągu z danymi wejściowymi dostarczonymi przez programistę, argumentami tej funkcji są łańcuch i dane wejściowe dla przypadku jak 1, aby zmienić ciąg na małe litery.
StrConv to skrót od „String Conversion”. Korzystając z tej funkcji VBA, możemy przekonwertować podany ciąg na określony format. Jedną z rzeczy, które musisz tutaj zrozumieć, jest to, że możemy użyć tej formuły tylko jako funkcji VBA, a nie jako funkcji arkusza programu Excel. W tym artykule omówimy pełne szczegółowe przykłady formuły „ VBA StrConv ”.
Ok, spójrz na składnię funkcji StrConv .
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv__2.png.webp)
Ciąg: To nic innego jak tekst, który próbujemy przekonwertować.
Konwersja: jakiego rodzaju konwersji musimy dokonać. Poniżej mamy szeroki wybór opcji, poniżej znajduje się lista konwersji, które możemy wykonać.
- vbUpperCase lub 1: Ta opcja konwertuje podaną wartość Text na wielkie litery. Działa to podobnie do funkcji UCASE. Na przykład, jeśli podasz słowo „Excel”, zostanie ono przekonwertowane na „EXCEL”.
- vbLowerCase lub 2: Ta opcja konwertuje podaną wartość Text na małe litery w programie Excel. Działa to podobnie do funkcji LCASE. Na przykład, jeśli podasz słowo „Excel”, zostanie ono przekonwertowane na „excel”.
- vbProperCase lub 3: Ta opcja konwertuje podaną wartość Text na znak właściwej wielkości liter. Każdy pierwszy znak słowa will jest zamieniany na duże, a wszystkie pozostałe litery na małe. Na przykład, jeśli podasz słowo „excEL”, zostanie ono przekonwertowane na „Excel”.
- vbUniCode lub 64: Ta opcja konwertuje ciąg na kod Unicode.
- vbFromUnicode lub 128: Konwertuje ciąg Unicode na domyślny kod systemowy.
Chociaż mamy kilka innych opcji z powyższym argumentem Konwersja , trzy są dla nas wystarczające.
LCID: to jest identyfikator ustawień regionalnych. Domyślnie pobiera identyfikator systemu. To nie zajmie 99% czasu.
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv_.png.webp)
Przykłady funkcji StrConv w VBA
Przykład 1
Spójrzmy teraz na przykład konwersji ciągu znaków na znak WIELKICH LITER. Używam tutaj słowa „Excel VBA”. Poniżej znajduje się kod VBA.
Kod:
Sub StrConv_Example1 () Dim TextValues As String Dim Result As String TextValues = "Excel vba" Result = StrConv (TextValues, vbUpperCase) MsgBox Result End Sub
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv__3.png.webp)
Spowoduje to przekonwertowanie ciągu „Excel VBA” na wielkie litery.
Uruchom ten kod za pomocą klawisza F5 lub ręcznie i zobacz wynik tego samego.
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv_.gif)
Przykład nr 2
Teraz spójrz na ten sam ciąg z konwersją na małe litery. Poniżej znajduje się kod.
Kod:
Sub StrConv_Example2 () Dim TextValues As String Dim Result As String TextValues = "Excel vba" Result = StrConv (TextValues, vbLowerCase) MsgBox Result End Sub
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv__4.png.webp)
Spowoduje to konwersję ciągu „Excel VBA” na małe litery.
Możesz uruchomić ręcznie lub za pomocą klawisza skrótu programu Excel F5. Poniżej znajduje się wynik tego samego.
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv__2.gif)
Przykład nr 3
Teraz spójrz na ten sam ciąg z odpowiednią konwersją wielkości liter. Poniżej znajduje się kod.
Kod:
Sub StrConv_Example3 () Dim TextValues As String Dim Wynik jako String TextValues = "Excel vba" Result = StrConv (TextValues, vbProperCase) MsgBox Result End Sub
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv__5.png.webp)
Spowoduje to konwersję ciągu „Excel VBA” na odpowiednią wielkość liter. Każda pierwsza litera ciągu jest wielka, każda litera po spacji jest również zamieniana na wielką, a wszystkie pozostałe znaki zostaną zamienione na małe. Poniżej znajduje się wynik tego samego.
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv__3.gif)
Przykład 4
Spójrzmy teraz na przykład znaku Unicode. Spójrz na poniższy kod.
Kod:
Sub StrConv_Example4 () Dim i As Long Dim x () As Byte x = StrConv ("ExcelVBA", vbFromUnicode) For i = 0 To UBound (x) Debug.Print x (i) Next End Sub
Spowoduje to wydrukowanie wszystkich znaków Unicode w bezpośrednim oknie.
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv__6.png.webp)
W kodzie ASCII „E” Unicode to 69, „x” Unicode to 120 i tak dalej. W ten sposób, używając VBA StrConv, możemy przekonwertować ciąg na Unicode.
![](https://cdn.know-base.net/5727662/vba_strconv_function_examples_how_to_use_strconv__4.gif)