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 ali je izhod za to funkcijo enak kot vrne dolžino niza.
Funkcija VBA LEN
Funkcija VBA LEN vrne "dolžino niza", tj. In vrne, koliko znakov je v navedeni vrednosti. Med vsemi funkcijami nizov v VBA je funkcija »LEN« najbolj premalo izkoriščena. Videl sem funkcijo "VBA LEN", ki se uporablja kot podporna funkcija za druge nizne funkcije, kot so funkcije VBA MID in VBA RIGHT.
Kako najdem dolžino niza ali vrednosti?
Če na primer stavite "Pozdravljeni, dobro jutro !!!" in ž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 'V tem primeru so se moji podatki začeli iz druge celice in končajo na 6. mestu. 'Na podlagi vaših podatkov spremenite številke OurValue = ActiveSheet.Cells (k, 1) .Value' To bo izvleklo prvih 10 znakov, tj. Datumski del ActiveSheet.Cells (k, 2). Vrednost = levo (Trim (OurValue), 10) 'To bo izvleklo del opomb ActiveSheet.Cells (k, 3). Vrednost = Mid (Trim (OurValue), 11, Len (Trim (OurValue)) - 10) Next End Sub
Ko zaženemo to kodo ročno ali s tipko F5, bomo dobili rezultat, kot je prikazano spodaj.
2. primer
Zdaj vam bom pokazal, kako uporabljati dolžino niza VBA kot podporno funkcijo za pridobivanje priimka polnega imena s funkcijo RIGHT & Instr.
Za predstavitev si oglejte spodnje podatke.
Iz zgornjega seznama moramo iz polnega imena izvleči Priimek. Spodnja koda bo izvlekla priimek. LEN se tukaj uporablja kot podporna funkcija.
Koda:
Sub LEN_Example2 () Dim FullName As String Dim k As Long For k = 2 To 8 FullName = ActiveSheet.Cells (k, 1) .Value 'To bo izvleklo priimek ActiveSheet.Cells (k, 2). , Len (FullName) - InStr (1, FullName, "")) 'LEN najde celotno število znakov' Instr najde presledek 'LEN - Inst will daje skupno število znakov na desni Next End Sub
Zaženite kodo s tipko F5 ali pa jo zaženite ročno in si oglejte rezultat.
Dolžino niza Excel VBA lahko prenesete tukaj - Predloga funkcije VBA LEN
