Функція VBA LEN | Як за допомогою LEN знайти довжину рядка в Excel?

Функція Len є загальною функцією як для робочого аркуша, так і для VBA, це вбудована функція для обох платформ, і синтаксис використання цієї функції також подібний, аргументи, які ця функція бере на обох платформах, подібні, що є рядком і використанням або вихід для цієї функції такий самий, що і повертає довжину рядка.

Функція VBA LEN

Функція VBA LEN повертає "довжину рядка", тобто повертає, скільки символів є у наданому значенні. З усіх рядкових функцій у VBA функція “LEN” є найбільш недостатньо використовуваною функцією. Я бачив функцію “VBA LEN”, яка використовується як функція підтримки для інших рядкових функцій, таких як VBA MID Функції та VBA RIGHT.

Як знайти довжину рядка чи значення?

Наприклад, якщо ви речення "Привіт хлопці, доброго ранку !!!" а ви, якщо хочете знайти кількість символів у ньому, як це знайти? У цій статті ми покажемо вам функцію “VBA LEN”.

Формула функції VBA LEN

Функція LEN має лише один синтаксис, тобто Вираз.

Вираз - це не що інше, як значення, яке ми намагаємось перевірити.

Наприклад, Лен ("Добре") поверне 4.

Приклади

Нижче наведено приклади довжини рядкової функції VBA.

Приклад №1

Довжина функції VBA String дуже проста у використанні. Наприклад, подивіться на наведений нижче код VBA.

Код:

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

У наведеному вище коді змінною є "Total_Length".

Затемнити загальну_ довжину як рядок

Для цієї змінної ми призначили значення за допомогою функції VBA LEN.

Total_Length = Len ("Excel VBA")

Для функції LEN ми призначили значення як «Excel VBA».

Total_Length = Len ("Excel VBA")

Далі ми показуємо результат у вікні повідомлення VBA.

MsgBox Total_Length

Коли я запускаю цей код за допомогою клавіші F5 або вручну, у результаті ми отримаємо 9, оскільки пробіл - це також символ.

VBA LEN як функція підтримки

Приклад №1

Призначення функції LEN здебільшого використовується з іншими функціями. Я використовував цю функцію з функціями ПРАВО та Інстр.

Наприклад, подивіться наведені нижче зразки даних.

З наведених даних нам потрібно окремо витягнути дату та окремо зауваження. Скопіюйте вищезазначені дані на ваш аркуш Excel і вставте в комірку A1.

Для вилучення цих елементів нам потрібно використовувати функцію LEN з іншими рядковими функціями. Наведений нижче код допоможе нам.

Код:

Sub LEN_Example1 () Dim OurValue As String Dim k As Long For k = 2 To 6 '. У цьому випадку мої дані починалися з другої комірки і закінчуються на 6-й. 'На основі ваших даних змініть цифри OurValue = ActiveSheet.Cells (k, 1) .Value' Це витягне перші 10 символів, тобто частину дати ActiveSheet.Cells (k, 2). Value = Left (Trim (OurValue), 10) 'Це витягне частину зауважень ActiveSheet.Cells (k, 3). Значення = Mid (Trim (OurValue), 11, Len (Trim (OurValue)) - 10) Next End Sub

Коли ми запускаємо цей код вручну або за допомогою клавіші F5, ми отримаємо результат, як показано нижче.

Приклад №2

Тепер я покажу вам, як використовувати довжину рядка VBA як функцію підтримки для вилучення прізвища повного імені за допомогою функції RIGHT & Instr.

Для демонстрації подивіться наведені нижче дані.

З наведеного списку нам потрібно витягти Прізвище з повного імені. У наведеному нижче коді буде вилучено прізвище. LEN використовується тут як функція підтримки.

Код:

 Підзаголовок LEN_Example2 () Dim FullName As String Dim k As Long For k = 2 To 8 FullName = ActiveSheet.Cells (k, 1) .Value 'Це витягне прізвище ActiveSheet.Cells (k, 2). , Len (FullName) - InStr (1, FullName, "")) 'LEN знаходить повну кількість символів' Instr знаходить пробіл 'LEN - Inst will дає загальну кількість символів праворуч Next End Sub 

Запустіть код, використовуючи клавішу F5, або ви можете запустити вручну і побачити результат.

Ви можете завантажити цю довжину рядка VBA Excel тут - Шаблон функції VBA LEN