Funzione VBA LEN

La funzione Len è una funzione comune sia per il foglio di lavoro che per VBA, è una funzione incorporata per entrambe le piattaforme e anche la sintassi per utilizzare questa funzione è simile, gli argomenti che questa funzione accetta in entrambe le piattaforme sono simili che è una stringa e l'uso oppure l'output per questa funzione è lo stesso che restituisce la lunghezza di una stringa.

La funzione VBA LEN restituisce la "lunghezza della stringa", ovvero restituisce quanti caratteri ci sono nel valore fornito. Di tutte le funzioni di stringa in VBA, "LEN" è la funzione più sottoutilizzata. Ho visto la funzione "VBA LEN" utilizzata come funzione di supporto per altre funzioni di stringa come le funzioni MID VBA e la funzione VBA RIGHT.

Come trovi la lunghezza della stringa o del valore?

Ad esempio, se la frase "Hello Guys, Good Morning !!!" e tu se vuoi trovare il numero di caratteri in esso come lo trovi? In questo articolo, ti mostreremo la funzione "VBA LEN".

Formula della funzione LEN VBA

La funzione LEN ha una sola sintassi, ovvero Espressione.

Un'espressione non è altro che il valore che stiamo cercando di testare.

Ad esempio, Len ("Buono") restituirà 4.

Esempi

Di seguito sono riportati gli esempi di VBA Length of String Function.

Esempio 1

La lunghezza di una funzione String VBA è molto semplice da usare. Ad esempio, guarda il codice VBA sottostante.

Codice:

 Sub LEN_Example () Dim Total_Length As String Total_Length = Len ("Excel VBA") MsgBox Total_Length End Sub

Nel codice precedente la variabile è "Total_Length".

Dim Total_Length As String

Per questa variabile, abbiamo assegnato il valore tramite la funzione VBA LEN.

Total_Length = Len ("Excel VBA")

Per la funzione LEN, abbiamo assegnato il valore come "Excel VBA".

Total_Length = Len ("Excel VBA")

Successivamente, stiamo mostrando il risultato nella finestra di messaggio VBA.

MsgBox Total_Length

Quando eseguo questo codice usando il tasto F5 o manualmente, otterremo 9 come risultato perché anche lo spazio è un carattere.

VBA LEN come funzione di supporto

Esempio 1

Lo scopo della funzione LEN viene utilizzato principalmente con altre funzioni. Ho usato questa funzione con le funzioni RIGHT e Instr.

Ad esempio, guarda i dati di esempio di seguito.

Dai dati di cui sopra, dobbiamo estrarre la data separatamente e le osservazioni separatamente. Copia i dati sopra sul tuo foglio Excel e incollali nella cella A1.

Per estrarre questi elementi, dobbiamo utilizzare la funzione LEN con altre funzioni stringa. Il codice seguente farà il lavoro per noi.

Codice:

Sub LEN_Example1 () Dim OurValue As String Dim k As Long For k = 2 To 6 'In questo caso i miei dati iniziano dalla seconda cella e terminano alla sesta. "In base ai tuoi dati, modifica i numeri OurValue = ActiveSheet.Cells (k, 1) .Value" Questo estrarrà i primi 10 caratteri, ovvero la parte della data ActiveSheet.Cells (k, 2) .Value = Left (Trim (OurValue), 10) 'Questo estrarrà la parte dei commenti ActiveSheet.Cells (k, 3) .Value = Mid (Trim (OurValue), 11, Len (Trim (OurValue)) - 10) Next End Sub

Quando eseguiamo questo codice manualmente o tramite il tasto F5, otterremo il risultato come il seguente.

Esempio n. 2

Ora ti mostrerò come utilizzare VBA Length of string come funzione di supporto per estrarre il cognome del nome completo con la funzione RIGHT & Instr.

Per la dimostrazione guarda i dati sottostanti.

Dall'elenco sopra, dobbiamo estrarre il cognome dal nome completo. Il codice seguente estrarrà il cognome. LEN utilizzato come funzione di supporto qui.

Codice:

 Sub LEN_Example2 () Dim FullName As String Dim k As Long For k = 2 To 8 FullName = ActiveSheet.Cells (k, 1) .Value 'Questo estrarrà il cognome ActiveSheet.Cells (k, 2) .Value = Right (FullName , Len (FullName) - InStr (1, FullName, "")) 'LEN trova il numero completo di caratteri' Instr trova il carattere spazio 'LEN - Inst restituisce il totale dei caratteri da destra Next End Sub