Funkcija Len je skupna funkcija tako za delovni list kot za VBA, je vgrajena funkcija za obe platformi in sintaksa za uporabo te funkcije je prav tako podobna, argumenti, ki jih ta funkcija uporablja na obeh platformah, so podobni, kar je niz in uporaba ali je izhod za to funkcijo enak vrnitvi dolžine niza.
Funkcija VBA LEN
Funkcija VBA LEN vrne "dolžino niza", tj. Vrne, koliko znakov je v navedeni vrednosti. Med vsemi funkcijami nizov v VBA je funkcija »LEN« najbolj premalo uporabljena funkcija. Videl sem funkcijo “VBA LEN”, ki se uporablja kot podporna funkcija za druge funkcije nizov, kot so funkcije VBA MID in VBA RIGHT.
Kako najdem dolžino niza ali vrednosti?
Če na primer stavite "Pozdravljeni, dobro jutro !!!" in če želite najti število znakov v njem, kako ga najdete? V tem članku vam bomo prikazali funkcijo "VBA LEN".
Formula funkcije VBA LEN
Funkcija LEN ima samo eno sintakso, tj. Expression.
Izraz ni nič drugega kot vrednost, ki jo skušamo preizkusiti.
Na primer, Len ("Dobro") bo vrnil 4.
Primeri
Spodaj so primeri VBA dolžine funkcije niza.
Primer # 1
Dolžina funkcije VBA String je zelo enostavna za uporabo. Na primer, poglejte spodnjo kodo VBA.
Koda:
Sub LEN_Example () Dim Total_Length As String Total_Length = Len ("Excel VBA") MsgBox Total_Length End Sub 
V zgornji spremenljivki kode je "Total_Length".
Zatemni skupno_dolžino kot niz
Za to spremenljivko smo vrednost dodelili s funkcijo VBA LEN.
Total_Length = Len ("Excel VBA")Za funkcijo LEN smo vrednost dodelili kot »Excel VBA«.
Total_Length = Len ("Excel VBA")Nato v oknu za sporočilo VBA prikažemo rezultat.
MsgBox Skupna_dolžina
Ko zaženem to kodo s tipko F5 ali ročno, bomo dobili 9 kot rezultat, ker je presledek tudi znak.
VBA LEN kot podporna funkcija
Primer # 1
Namen funkcije LEN se večinoma uporablja z drugimi funkcijami. To funkcijo sem uporabil s funkcijami DESNO in Instr.
Na primer, poglejte spodnje vzorčne podatke.
Iz zgornjih podatkov moramo ločeno izvleči Datum in Opombe. Kopirajte zgornje podatke na svoj excel list in prilepite v celico A1.
Da bi izvlekli te elemente, moramo uporabiti funkcijo LEN z drugimi funkcijami niza. Spodnja koda bo opravila delo namesto nas.
Koda:
Sub LEN_Example1() Dim OurValue As String Dim k As Long For k = 2 To 6 'In this case my data started from second cell and ends at 6th. 'Based on your data change the numbers OurValue = ActiveSheet.Cells(k, 1).Value 'This will extract first 10 characters i.e. Date portion ActiveSheet.Cells(k, 2).Value = Left(Trim(OurValue), 10) 'This will extract teh remarks portion ActiveSheet.Cells(k, 3).Value = Mid(Trim(OurValue), 11, Len(Trim(OurValue)) - 10) Next End Sub
When we run this code manually or through the F5 key, we will get the result like the below.
Example #2
Now I will show you how to use VBA Length of string as a support function to extract the last name of the full name with RIGHT & Instr function.
For the demonstration look at the below data.
From the above list, we need to extract the Last Name from the full name. The below code will extract the last name. LEN used as a support function here.
Code:
Sub LEN_Example2() Dim FullName As String Dim k As Long For k = 2 To 8 FullName = ActiveSheet.Cells(k, 1).Value 'This will extract last name ActiveSheet.Cells(k, 2).Value = Right(FullName, Len(FullName) - InStr(1, FullName, " ")) 'LEN finds full number of characters 'Instr finds space character 'LEN - Inst will gives total characters from the right Next End Sub
Run the code using the F5 key or you can run manually and see the result.
You can download this Excel VBA Length of String here – VBA LEN Function Template