VBA 字符串函数

2025年3月17日 | 阅读 7 分钟

字符串是 Excel 中最常用的数据类型，用于存储数据。因此，字符串函数变得非常重要。使用这些函数，您可以操作字符串数据，查找指定字符串值的字符数，合并两个文本，同时拆分它们，从字符串中提取部分字符，或者删除或修剪字符串值中存在的额外空格。我们可以从字符串的左侧修剪值。

在本教程中，我们将介绍各种函数，这些函数允许您从不同位置的字符串中提取子字符串，删除字符串中不需要的空格，拆分字符串值，比较字符串以及其他有用的字符串函数。

什么是字符串函数？

"VBA 字符串函数通过操作数据创建新字符串。它不会替换原始字符串，而是此函数会创建新字符串。有各种各样的字符串函数，它们都归类为 VBA 字符串或文本函数。"

VBA 中 7 个常用的字符串函数

VBA 中有许多字符串函数，可以帮助用户操作字符串字符并在代码中处理文本数据。下面列出了我们日常处理字符串数据时最常使用的 7 个字符串函数。

LEN 函数
LEFT 函数
RIGHT 函数
MID 函数
TRIM 函数
Instr 函数
Split 函数

1 - LEN 字符串函数

VBA LEN 函数是“LENGTH”的缩写。此函数返回用户在字符串中提供的字符数。例如，如果我们提供了字符串“Hello World”，LEN 函数将返回 11，因为字符串“Hello World”中总共有 11 个字符（包括空格字符）。

语法

参数

String (必需): String 参数表示我们要查找总长度的字符。

程序：使用 VBA 宏查找字符串“Hello World”的长度。

Sub LEN_StringFunction_Example()
  'Declaring the variable
  Dim LenCount As String
  'Using Len function to count the total characters
  LenCount = Len("Hello World")
  MsgBox LenCount
End Sub

输出

按 F5 键运行代码并获取结果。您将在 Excel 工作表中看到以下消息框，显示输出 11。

2 - LEFT 字符串函数

VBA LEFT 函数用于从指定字符串的左侧提取字符长度。

语法

参数

String (必需): 此参数表示我们要从中提取的字符串的长度。
Length (必需): 此参数表示用户想要从给定字符串的左侧获取多少个字符。

程序：使用 LEFT 函数编写一个 VBA 宏来获取字符串“Reema Panda”的名字。

Sub LEFT_StringFunction_Example()
  'Declaring the string variable
  Dim FirstNme As String
  'Using the Left function to fetch the first name
  FirstNme = Left("Reema Panda", 5)
  'return the output
  MsgBox FirstNme

End Sub

输出

按 F5 键运行代码并获取结果。您将在 Excel 工作表中看到以下消息框，显示输出。

上面的代码从字符串“Reema Panda”中提取了前 5 个字符。因此，结果是名字，“Reema”。

3 - RIGHT 字符串函数

在上面的函数中，我们从字符串的左侧提取了值；同样，VBA LEFT 函数用于从指定字符串的左侧提取字符长度。

语法

参数

String (必需): 此参数表示我们要从右侧提取的字符串的长度。
Length (必需): 此参数表示用户想要从给定字符串的右侧获取多少个字符。

程序：使用 RIGHT 函数编写一个 VBA 宏来获取字符串“Reema Panda”的名字。

Sub Right_StringFunction_Example()
  'Declaring the string variable
  Dim LastNme As String
  'Using the Right function to fetch the last name
  LastNme = Right("Reema Panda", 5)
  'return the output
  MsgBox LastNme
End Sub

输出

按 F5 键运行代码并获取结果。您将在 Excel 工作表中看到以下消息框，显示输出。

这将从字符串“Reema Panda”的右侧提取 5 个字符。因此，输出将是姓氏，“Panda”。

4 - MID 字符串函数

字符串函数的好处是，它们不仅允许用户从字符串的右侧或左侧提取字符，而且还可以帮助从中间位置提取字符。

例如，如果您有一个字符串“Reema Devi Panda”，那么这个字符串中的中间值是“4”，从字符的起始位置是 6，我们需要从起始位置提取 6 个字符。

语法

参数

String (必需): 此参数表示我们要从中提取的字符串的长度（来自中间）。
Starting Position (必需): 要提取的起始字符位置号是多少？
Number of Characters to Extract (可选): 从起始位置开始，要提取多少个字符。

程序：编写一个 VBA 程序来提取字符串中间的字符。

Sub MID_StringFunction_Example() 
 'Declaring the variable
  Dim MiddleNme As String
  'Using the Mid function to extract the middle name
  MiddleNme = Mid("Reema Rani Panda", 6, 6)
  'Fetching the output
  MsgBox MiddleNme
End Sub

输出

按 F5 键运行代码并获取结果。您将在 Excel 工作表中看到以下消息框，显示输出。

结果，它将从指定的字符串中提取中间名“Rani”。

5 - TRIM 字符串函数

VBA TRIM 函数用于清理数据。它将删除字符串中不需要的空格字符。此函数工作起来很简单，它将一个字符串值（您要修剪的）作为参数。

例如，假设您有字符串“ Hello, Do you love VBA? ”。这里我们在“Hello”一词之前有不必要的空格字符，所以使用 TRIM。我们可以删除这个

语法

参数

String (必需): 此参数表示您要从中删除不必要空格字符的字符串。

程序：编写一个 VBA 程序，使用 MID 函数从字符串“ Hello, Do you love VBA? ”中删除不必要的空格字符。

Sub TRIM_StringFunction_Example()
  'Declaring the variable
  Dim MyVal As String
  'Using the Trim function to eliminate the unwanted space characters
  MyVal = Trim("   Hello, Do you love VBA?  ")
  'Fetching the output
  MsgBox MyVal

End Sub

输出

按 F5 键运行代码并获取结果。您将在 Excel 工作表中看到以下消息框，显示输出。

结果，您会注意到，所有多余的空格都已从字符串的开头和结尾被删除。

注意：与 Right、Left 和 Mid 不同，VBA 还提供了 LTRIM 和 RTRIM 函数。如果您想删除字符串左侧的不需要的空格，请使用 LTRIM 函数；如果您想删除字符串右侧的不需要的空格，请使用 RTRIM 函数。

6 - Instr 字符串函数

VBA Instr 字符串函数有助于查找所提供字符串中任何特定字符的位置。

语法

参数

Start (可选): 此参数表示搜索的起始位置。如果跳过此参数，则默认起始值为 1。

String (必需): 此参数表示要在其中搜索的字符串。

Substring (必需): 此参数表示您要查找的子字符串。

Compare (可选): 此参数表示要执行的比较类型。它可以是以下值之一：

VBA 常量	值	说明
vbUseCompareOption	-1	使用 Option Compare
vbBinaryCompare	0	二进制比较
vbTextCompare	1	文本比较

程序：编写一个程序来快速查找字符串“VBA World”中“o”的位置。

Sub INSTR_StringFunction_Example()
  'Declaring the string variable
    Dim MyVal As String
  'Using the INSTR function to find position of 'o' in the string
     MyVal = InStr(1, "VBA World", "o")
  'return the output
    MsgBox MyVal
End Sub

输出

按 F5 键运行代码并获取结果。您将在 Excel 工作表中看到以下消息框，显示输出。

结果，您会注意到，消息框将显示输出 5。

7 - Split 字符串函数

SPLIT 字符串函数用于根据提供的分隔符将字符串拆分为子字符串。

语法

参数

Expression (必需): 此参数表示您要根据分隔符拆分的输入字符串。

Delimiter (可选): 此参数表示用于拆分字符串的分隔符。它通常涉及“Expression”参数。

Limit (可选): 此参数指定用户希望返回的子字符串总数。

Compare (可选): 此参数返回用户希望 SPLIT 函数在评估子字符串时执行的比较类型。

程序

Sub Split_StringFunction_Example()
    'Decalaring a variable
    Dim TextStr As String
    Dim Result() As String
    TextStr = "Welcome to the world of VBA programming."
    'Spliting the string using the split function with delimeter space
    Result() = Split(TextStr)
End Sub

其他字符串函数列表

序号	字符串函数	说明
1	String	String 函数用于将数字转换为字符串。
2	替换	Replace 字符串函数用另一个提供的子字符串替换指定字符串中的子字符串。
3	StrReverse	StrReverse 字符串函数返回具有反转字符的指定字符串。
4	连接	Join 函数用于连接不同的字符串。
5	InStrRev	InStrRev 函数在字符串中搜索子字符串。
6	格式	Format 函数用于根据提供的指令格式化字符串。
7	StrConv	StrConv 函数使用 vbUpperCase 或 vbLowerCase 参数将字符串转换为小写或大写。
8	UCase	UCase 函数将字符串转换为大写。
9	LCase	LCase 函数将字符串转换为小写。
10	CStr, Str	Str 或 CStr 函数用于将数字转换为字符串。
11	StrComp	StrComp 用于比较两个字符串。
12	喜欢	Like 函数检查字符串是否具有提供的模式。

下一主题#

VBA 字符串函数

什么是字符串函数？

VBA 中 7 个常用的字符串函数

1 - LEN 字符串函数

2 - LEFT 字符串函数

3 - RIGHT 字符串函数

4 - MID 字符串函数

5 - TRIM 字符串函数

注意：与 Right、Left 和 Mid 不同，VBA 还提供了 LTRIM 和 RTRIM 函数。如果您想删除字符串左侧的不需要的空格，请使用 LTRIM 函数；如果您想删除字符串右侧的不需要的空格，请使用 RTRIM 函数。

6 - Instr 字符串函数

7 - Split 字符串函数

其他字符串函数列表

联系信息

关注我们

教程

面试题

在线编译器

Python

Java

.Net Framework

AI, ML and Data Science

Cloud Technology

B.Tech and MCA

Web Technology

PHP

Software Testing

Technical Interview

Java Interview

Python

Web Interview

Database Interview

B.Tech / MCA

Important Interview

Software Testing Interview

Company Interviews

Online Compilers

Multiple Choice Questions

VBA 教程

VBA 字符串函数

什么是字符串函数？

VBA 中 7 个常用的字符串函数

1 - LEN 字符串函数

2 - LEFT 字符串函数

3 - RIGHT 字符串函数

4 - MID 字符串函数

5 - TRIM 字符串函数

注意：与 Right、Left 和 Mid 不同，VBA 还提供了 LTRIM 和 RTRIM 函数。如果您想删除字符串左侧的不需要的空格，请使用 LTRIM 函数；如果您想删除字符串右侧的不需要的空格，请使用 RTRIM 函数。

6 - Instr 字符串函数

7 - Split 字符串函数

其他字符串函数列表

相关帖子

什么是宏？

VBA For 循环

Microsoft Excel VBA ChDir 函数

VBA Len 函数

VBA 注释

VBA Instr 函数

VBA TRIM 函数

VBA 错误处理

VBA Inputbox

VBA VLookup

订阅 Tpoint Tech

联系信息

关注我们

教程

面试题

在线编译器