Len funkcija ir kopīga funkcija gan darblapai, gan VBA, tā ir iebūvēta funkcija abām platformām, un sintakse, lai izmantotu šo funkciju, ir arī līdzīga, argumenti, kurus šī funkcija ņem abās platformās, ir līdzīgi, kas ir virkne un vai šīs funkcijas izvade ir tāda pati kā atgriež virknes garumu.
VBA LEN funkcija
Funkcija VBA LEN atgriež “virknes garumu”, ti, un atgriež, cik rakstzīmju ir piegādātajā vērtībā. No visām VBA virkņu funkcijām “LEN” ir visvairāk nepietiekami izmantota funkcija. Esmu redzējis, ka funkcija “VBA LEN” tiek izmantota kā atbalsta funkcija citām virkņu funkcijām, piemēram, VBA MID funkcijām un VBA RIGHT funkcijai.
Kā atrast virknes vai vērtības garumu?
Piemēram, ja jūs sakāt: “Sveiki puiši, labrīt !!!” un jūs vēlaties atrast tajā rakstzīmju skaitu, kā jūs to atrast? Šajā rakstā mēs parādīsim funkciju “VBA LEN”.
VBA LEN funkcijas formula
LEN funkcijai ir tikai viena sintakse, ti, izteiksme.
Izteiksme ir nekas cits kā vērtība, kuru mēs cenšamies pārbaudīt.
Piemēram, Lens (“Labs”) atgriezīs vērtību 4.
Piemēri
Tālāk ir sniegti VBA virknes funkcijas garuma piemēri.
1. piemērs
Funkcijas VBA virknes garums ir ļoti vienkāršs. Piemēram, apskatiet zemāk redzamo VBA kodu.
Kods:
Sub LEN_Example () Dim Total_Length As String Total_Length = Len ("Excel VBA") MsgBox Total_Length End Sub
Iepriekš minētajā koda mainīgajā lielumā ir “Kopējais_Length”.
Dim Total_Length kā virkne
Šim mainīgajam mēs esam piešķīruši vērtību, izmantojot funkciju VBA LEN.
Total_Length = Len ("Excel VBA")
Funkcijai LEN vērtība ir piešķirta kā “Excel VBA”.
Total_Length = Len ("Excel VBA")
Tālāk mēs parādām rezultātu VBA ziņojumu lodziņā.
MsgBox Total_Length
Kad es palaidīšu šo kodu, izmantojot F5 taustiņu vai manuāli, mēs iegūsim 9, jo atstarpe ir arī raksturs.
VBA LEN kā atbalsta funkcija
1. piemērs
Funkcijas LEN mērķis galvenokārt tiek izmantots kopā ar citām funkcijām. Esmu izmantojis šo funkciju ar RIGHT & Instr funkcijām.
Piemēram, apskatiet zemāk redzamos datu paraugus.
No iepriekšminētajiem datiem mums datums jāizņem atsevišķi un piezīmes atsevišķi. Nokopējiet iepriekš minētos datus savā Excel lapā un ielīmējiet šūnā A1.
Lai iegūtu šos elementus, mums jāizmanto funkcija LEN ar citām virkņu funkcijām. Zemāk redzamais kods padarīs darbu mūsu vietā.
Kods:
Sub LEN_Example1 () Dim OurValue As String Dim k As Long For k = 2 To 6 'Šajā gadījumā mani dati sākās no otrās šūnas un beidzas 6. vietā. "Pamatojoties uz jūsu datiem, mainiet skaitļus OurValue = ActiveSheet.Cells (k, 1) .Value" Tas iegūs pirmās 10 rakstzīmes, ti, datuma daļu ActiveSheet.Cells (k, 2). Vērtība = pa kreisi (Trim (OurValue), 10) "Tādējādi tiks izvilkta piezīmju daļa ActiveSheet.Cells (k, 3). Vērtība = Vidēja (Trim (OurValue), 11, Len (Trim (OurValue)) - 10) Next End Sub
Palaižot šo kodu manuāli vai caur F5 taustiņu, mēs iegūsim rezultātu, piemēram, zemāk.
2. piemērs
Tagad es jums parādīšu, kā izmantot VBA virknes garumu kā atbalsta funkciju, lai ar RIGHT & Instr funkciju iegūtu pilna vārda uzvārdu.
Demonstrācijai aplūkojiet zemāk redzamos datus.
No iepriekš minētā saraksta mums jāizņem uzvārds no pilna vārda. Zemāk esošais kods iegūs uzvārdu. LEN šeit tiek izmantota kā atbalsta funkcija.
Kods:
Apakšējā LEN_Example2 () Dim FullName kā virkne Dim k As Long Par k = 2 līdz 8 FullName = ActiveSheet.Cells (k, 1). Vērtība 'Tas izvilks uzvārdu ActiveSheet.Cells (k, 2). Value = Right (FullName) , Len (Pilns nosaukums) - InStr (1, Pilns nosaukums, "")) '' LEN atrod pilnu rakstzīmju skaitu. Instr atrod atstarpes raksturs.
Palaidiet kodu, izmantojot taustiņu F5, vai arī varat palaist manuāli un redzēt rezultātu.
Šo Excel VBA virknes garumu varat lejupielādēt šeit - VBA LEN funkciju veidne
