Fungsi VBA LEN

Fungsi Len adalah fungsi umum untuk lembar kerja dan VBA, ini adalah fungsi bawaan untuk kedua platform dan sintaks untuk menggunakan fungsi ini juga serupa, argumen yang diambil fungsi ini di kedua platform serupa yaitu string dan penggunaannya atau keluaran untuk fungsi ini sama dengan mengembalikan panjang string.

Fungsi VBA LEN mengembalikan "panjang string" yaitu mengembalikan berapa banyak karakter yang ada dalam nilai yang diberikan. Dari semua fungsi string di VBA, "LEN" adalah fungsi yang paling jarang digunakan. Saya telah melihat fungsi "VBA LEN" digunakan sebagai fungsi dukungan untuk fungsi string lain seperti Fungsi VBA MID dan fungsi VBA RIGHT.

Bagaimana Anda menemukan panjang string atau nilai?

Misalnya, jika Anda mengucapkan kalimat "Halo Teman-teman, Selamat Pagi !!!" dan Anda jika Anda ingin menemukan jumlah karakter di dalamnya bagaimana Anda menemukannya? Di artikel ini, kami akan menunjukkan kepada Anda fungsi "VBA LEN".

Formula Fungsi VBA LEN

Fungsi LEN hanya memiliki satu sintaks yaitu Expression.

Sebuah ekspresi tidak lain adalah nilai yang kita coba uji.

Misalnya, Len ("Baik") akan mengembalikan 4.

Contoh

Di bawah ini adalah contoh VBA Length of String Function.

Contoh 1

Panjang fungsi String VBA sangat mudah digunakan. Misalnya, lihat kode VBA di bawah ini.

Kode:

 Sub LEN_Example () Redupkan Total_Length Sebagai String Total_Length = Len ("Excel VBA") MsgBox Total_Length End Sub

Dalam variabel kode di atas adalah "Total_Length".

Redupkan Total_Length Sebagai String

Untuk variabel ini, kami telah menetapkan nilai melalui fungsi VBA LEN.

Total_Length = Len ("Excel VBA")

Untuk fungsi LEN, kami telah menetapkan nilai sebagai "Excel VBA".

Total_Length = Len ("Excel VBA")

Selanjutnya, kami menunjukkan hasilnya di kotak pesan VBA.

MsgBox Total_Length

Ketika saya menjalankan kode ini menggunakan tombol F5 atau secara manual, kita akan mendapatkan 9 sebagai hasil karena spasi juga merupakan karakter.

VBA LEN sebagai Fungsi Pendukung

Contoh 1

Tujuan dari fungsi LEN banyak digunakan dengan fungsi lainnya. Saya telah menggunakan fungsi ini dengan fungsi RIGHT & Instr.

Misalnya, lihat contoh data di bawah ini.

Dari data di atas, kita perlu mengekstrak Tanggal secara terpisah dan Keterangan Secara Terpisah. Salin data di atas ke lembar excel Anda dan tempelkan di Sel A1.

Untuk mengekstrak elemen ini, kita perlu menggunakan fungsi LEN dengan fungsi string lainnya. Kode di bawah ini akan melakukan pekerjaan untuk kita.

Kode:

Sub LEN_Example1 () Dim OurValue As String Dim k As Long For k = 2 To 6 'Dalam hal ini data saya dimulai dari sel kedua dan berakhir di 6. 'Berdasarkan data Anda, ubah angka OurValue = ActiveSheet.Cells (k, 1) .Value' Ini akan mengekstrak 10 karakter pertama yaitu Bagian tanggal ActiveSheet.Cells (k, 2) .Value = Kiri (Trim (OurValue), 10) 'Ini akan mengekstrak bagian komentar ActiveSheet.Cells (k, 3) .Value = Mid (Trim (OurValue), 11, Len (Trim (OurValue)) - 10) Next End Sub

Saat kita menjalankan kode ini secara manual atau melalui tombol F5, kita akan mendapatkan hasil seperti di bawah ini.

Contoh # 2

Sekarang saya akan menunjukkan kepada Anda bagaimana menggunakan VBA Length of string sebagai fungsi pendukung untuk mengekstrak nama belakang dari nama lengkap dengan fungsi RIGHT & Instr.

Untuk demonstrasi, lihat data di bawah ini.

Dari daftar di atas, kita perlu mengekstrak Nama Belakang dari nama lengkap. Kode di bawah ini akan mengekstrak nama belakang. LEN digunakan sebagai fungsi pendukung di sini.

Kode:

 Sub LEN_Example2 () Dim FullName As String Dim k As Long For k = 2 To 8 FullName = ActiveSheet.Cells (k, 1). Value 'Ini akan mengekstrak nama belakang ActiveSheet.Cells (k, 2) .Value = Right (FullName , Len (FullName) - InStr (1, FullName, "")) 'LEN menemukan jumlah karakter penuh' Instr menemukan spasi karakter 'LEN - Inst akan memberikan total karakter dari kanan Next End Sub