Fungsi Excel VBA StrConv
Fungsi StrConv di VBA dikategorikan di bawah fungsi string yang merupakan fungsi konversi, penggunaan fungsi ini adalah mengubah kasus string dengan input yang diberikan oleh pengembang, argumen fungsi ini adalah string dan input untuk kasus seperti 1 untuk mengubah string menjadi huruf kecil.
StrConv adalah singkatan dari "Konversi String". Dengan menggunakan fungsi VBA ini, kita dapat mengonversi string yang disediakan ke format yang ditentukan. Satu hal yang perlu Anda pahami di sini adalah kita dapat menggunakan rumus ini sebagai fungsi VBA saja, bukan sebagai fungsi lembar kerja Excel. Pada artikel ini, kita akan mengikuti tur contoh lengkap rinci dari formula " VBA StrConv ".
Oke, lihat sintaks dari fungsi StrConv .

String: Ini tidak lain adalah teks yang kami coba ubah.
Konversi: Jenis konversi apa yang perlu kita lakukan. Kami memiliki berbagai macam pilihan di sini di bawah ini adalah daftar konversi yang dapat kami lakukan.
- vbUpperCase atau 1: Opsi ini mengubah nilai Teks yang diberikan menjadi karakter Huruf besar . Ini bekerja mirip dengan fungsi UCASE. Misalnya, jika Anda memasukkan kata "Excel", kata itu akan diubah menjadi "EXCEL".
- vbLowerCase atau 2: Opsi ini mengubah nilai Teks yang diberikan menjadi karakter huruf kecil di excel. Ini bekerja mirip dengan fungsi LCASE. Misalnya, jika Anda memasukkan kata "Excel", kata itu akan diubah menjadi "excel".
- vbProperCase atau 3: Opsi ini mengubah nilai Teks yang diberikan menjadi karakter kasus yang benar. Setiap karakter pertama dari kata tersebut akan diubah menjadi huruf besar, dan semua huruf yang tersisa diubah menjadi huruf kecil. Misalnya, jika Anda memasukkan kata "excEL", kata itu akan diubah menjadi "Excel".
- vbUniCode atau 64: Opsi ini mengubah string menjadi kode Unicode.
- vbFromUnicode atau 128: Ini mengubah string Unicode menjadi kode sistem default.
Meskipun kami memiliki beberapa opsi lain dengan argumen Konversi di atas, tiga opsi sudah cukup baik bagi kami.
LCID: Ini adalah Id Lokal. Secara default, ini mengambil id sistem. Ini tidak akan menggunakan 99% waktu.

Contoh Fungsi StrConv di VBA
Contoh 1
Sekarang lihat contoh mengonversi string menjadi karakter KASUS UPPER. Saya menggunakan kata "Excel VBA" di sini. Di bawah ini adalah kode VBA.
Kode:
Sub StrConv_Example1 () Redupkan Nilai Teks Sebagai String Dim Hasil Sebagai String TextValues = "Excel vba" Hasil = StrConv (TextValues, vbUpperCase) Hasil Akhir MsgBox Sub

Ini akan mengubah string "Excel VBA" menjadi huruf besar.
Jalankan kode ini menggunakan tombol F5 atau secara manual dan lihat hasil yang sama.

Contoh # 2
Sekarang lihat string yang sama dengan konversi huruf kecil. Di bawah ini adalah kodenya.
Kode:
Sub StrConv_Example2 () Redupkan Nilai Teks Sebagai String Dim Hasil Sebagai String TextValues = "Excel vba" Hasil = StrConv (TextValues, vbLowerCase) Hasil MsgBox End Sub

Ini akan mengubah string "Excel VBA" menjadi huruf kecil.
Anda dapat menjalankan secara manual atau melalui tombol pintas excel F5. Di bawah ini adalah hasil yang sama.

Contoh # 3
Sekarang lihat string yang sama dengan konversi kasus yang tepat. Di bawah ini adalah kodenya.
Kode:
Sub StrConv_Example3 () Redupkan Nilai Teks Sebagai String Dim Hasil Sebagai String TextValues = "Excel vba" Hasil = StrConv (TextValues, vbProperCase) Hasil Akhir MsgBox Sub

Ini akan mengubah string "Excel VBA" menjadi kasus yang sesuai. Setiap huruf pertama dari string adalah huruf besar, dan setiap huruf setelah spasi juga diubah menjadi huruf besar, dan semua karakter yang tersisa akan diubah menjadi huruf kecil. Di bawah ini adalah hasil yang sama.

Contoh # 4
Sekarang lihat contoh karakter Unicode. Lihat kode di bawah ini.
Kode:
Sub StrConv_Example4 () Dim i As Long Dim x () As Byte x = StrConv ("ExcelVBA", vbFromUnicode) Untuk i = 0 Ke UBound (x) Debug. Print x (i) Next End Sub
Ini akan mencetak semua karakter Unicode ke jendela langsung.

Pada kode ASCII, Unicode “E” adalah 69, “x” Unicode adalah 120, dan seterusnya. Seperti ini, dengan menggunakan VBA StrConv, kita dapat mengubah string menjadi Unicode.
