VBA LEN

Die Len-Funktion ist eine gemeinsame Funktion sowohl für Arbeitsblätter als auch für VBA. Sie ist eine integrierte Funktion für beide Plattformen, und die Syntax für die Verwendung dieser Funktion ist ebenfalls ähnlich. Die Argumente, die diese Funktion auf beiden Plattformen verwendet, sind ähnlich. Dies ist eine Zeichenfolge und die Verwendung oder die Ausgabe für diese Funktion ist dieselbe, da sie die Länge einer Zeichenfolge zurückgibt.

VBA LEN Funktion

Die VBA LEN-Funktion gibt die „Länge der Zeichenfolge“ zurück, dh, wie viele Zeichen der angegebene Wert enthält. Von allen Zeichenfolgenfunktionen in VBA ist „LEN“ die am wenigsten genutzte Funktion. Ich habe die Funktion „VBA LEN“ gesehen, die als Unterstützungsfunktion für andere Zeichenfolgenfunktionen wie VBA MID-Funktionen und VBA RIGHT-Funktion verwendet wird.

Wie finden Sie die Länge der Zeichenfolge oder des Werts?

Zum Beispiel, wenn Sie den Satz "Hallo Leute, guten Morgen !!!" und Sie, wenn Sie die Anzahl der Zeichen darin finden möchten, wie finden Sie es? In diesem Artikel zeigen wir Ihnen die Funktion „VBA LEN“.

Formel der VBA LEN-Funktion

Die LEN-Funktion hat nur eine Syntax, dh Ausdruck.

Ein Ausdruck ist nichts anderes als der Wert, den wir testen möchten.

Zum Beispiel wird Len ("Gut") 4 zurückgeben.

Beispiele

Nachfolgend finden Sie Beispiele für die VBA-Länge der Zeichenfolgenfunktion.

Beispiel 1

Die Länge einer VBA-String-Funktion ist sehr einfach zu verwenden. Schauen Sie sich zum Beispiel den folgenden VBA-Code an.

Code:

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

In der obigen Codevariablen ist "Total_Length".

Dim Total_Length As String

Für diese Variable haben wir den Wert über die VBA LEN-Funktion zugewiesen.

Total_Length = Len ("Excel VBA")

Für die LEN-Funktion haben wir den Wert als „Excel VBA“ zugewiesen.

Total_Length = Len ("Excel VBA")

Als nächstes zeigen wir das Ergebnis im VBA-Meldungsfeld.

MsgBox Total_Length

Wenn ich diesen Code mit der Taste F5 oder manuell ausführe, erhalten wir 9, da Leerzeichen auch ein Zeichen sind.

VBA LEN als Support-Funktion

Beispiel 1

Der Zweck der LEN-Funktion wird hauptsächlich mit anderen Funktionen verwendet. Ich habe diese Funktion mit RIGHT & Instr-Funktionen verwendet.

Schauen Sie sich zum Beispiel die folgenden Beispieldaten an.

Aus den obigen Daten müssen wir das Datum separat und die Bemerkungen separat extrahieren. Kopieren Sie die obigen Daten in Ihr Excel-Blatt und fügen Sie sie in Zelle A1 ein.

Um diese Elemente zu extrahieren, müssen wir die LEN-Funktion mit anderen Zeichenfolgenfunktionen verwenden. Der folgende Code erledigt die Arbeit für uns.

Code:

Sub LEN_Example1 () Dim OurValue As String Dim k As Long For k = 2 bis 6 'In diesem Fall begannen meine Daten in der zweiten Zelle und endeten am 6 .. 'Ändern Sie basierend auf Ihren Daten die Zahlen OurValue = ActiveSheet.Cells (k, 1) .Value' Dadurch werden die ersten 10 Zeichen extrahiert, dh der Datumsbereich ActiveSheet.Cells (k, 2) .Value = Left (Trim (OurValue), 10) 'Dadurch wird der Bemerkungsteil ActiveSheet.Cells (k, 3) extrahiert .Value = Mid (Trim (OurValue), 11, Len (Trim (OurValue)) - 10) Next End Sub

Wenn wir diesen Code manuell oder über die Taste F5 ausführen, erhalten wir das folgende Ergebnis.

Beispiel 2

Jetzt werde ich Ihnen zeigen, wie Sie die VBA-Länge der Zeichenfolge als Unterstützungsfunktion verwenden, um den Nachnamen des vollständigen Namens mit der Funktion RIGHT & Instr zu extrahieren.

Schauen Sie sich zur Demonstration die folgenden Daten an.

Aus der obigen Liste müssen wir den Nachnamen aus dem vollständigen Namen extrahieren. Der folgende Code extrahiert den Nachnamen. LEN wird hier als Unterstützungsfunktion verwendet.

Code:

 Sub LEN_Example2 () Dim FullName As String Dim k As Long For k = 2 bis 8 FullName = ActiveSheet.Cells (k, 1) .Value 'Dies extrahiert den Nachnamen ActiveSheet.Cells (k, 2) .Value = Right (FullName , Len (FullName) - InStr (1, FullName, "")) 'LEN findet die volle Anzahl von Zeichen' Instr findet Leerzeichen 'LEN - Inst gibt die Gesamtzahl der Zeichen vom rechten Next End Sub an 

Führen Sie den Code mit der Taste F5 aus, oder Sie können ihn manuell ausführen und das Ergebnis anzeigen.

Sie können diese Excel VBA-Zeichenfolgenlänge hier herunterladen - VBA LEN-Funktionsvorlage