如何在 vba 中反转字符串（附示例）

您可以使用 VBA 中的StrReverse函数来反转文本字符串。

以下是在实践中使用此功能的常见方法：

 SubReverseStrings ()
    
Dim i As Integer

For i = 2 To 11
    Range("B" & i) = StrReverse(Range("A" & i))
Next i

End Sub

此特定示例反转A2:A11范围内的每个字符串并显示B2:B11范围内的结果。

以下示例展示了如何在实践中使用此语法。

示例：如何使用 VBA 反转字符串

假设 Excel 中有以下篮球队名称列：

假设我们要反转每个团队的名称并将结果显示在 B 列的相应单元格中。

我们可以创建以下宏来执行此操作：

 SubReverseStrings ()
    
Dim i As Integer

For i = 2 To 11
    Range("B" & i) = StrReverse(Range("A" & i))
Next i

End Sub

当我们运行这个宏时，我们会收到以下输出：

B 列向后显示 A 列中的每个团队名称。

例如：

• 小牛队变成了svaM
• 热刺改名为SrupS
• 火箭队变成了stekcoR
• 国王队变成sgniK

等等。

请注意， StrReverse函数也适用于数字。

例如，将StrReverse函数应用于数字1234将返回4321 。

其他资源

以下教程说明如何在 VBA 中执行其他常见任务：

VBA：如何检查一个字符串是否包含另一个字符串
VBA：如何计算范围内的行数
VBA：如何编写 COUNTIF 和 COUNTIFS 函数