如果您遇到根据特定字符将文本分为两列或更多列的麻烦,则应阅读此文章。

在本文中,我们将学习如何使用Microsoft Excel中的VBA将名称拆分为3个单元格。

让我们举一个例子来了解我们可以在哪里以及如何拆分名称。我们在A列中有一个格式为“ FirstName Initial LastName”的名称列表。我们想将整个列分为三列,其中一列包含所有名字,第二列包含Initial,第三列包含所有姓氏。

image 1

我们将编写VBA代码以拆分名称。请按照以下给定步骤进行操作:-要将名称分为3个单元格,我们将使用VBA。参见下面的过程和代码,您将轻松理解它:-打开VBA页面并按Alt + F11插入模块然后进入插入菜单并单击过程,您将在此获得启动宏的过程。提到的代码:-

Public Sub SplitName()

X = Cells(Rows.Count, 1).End(xlUp).Row

For A = 1 To X

B = InStr(Cells(A, 1), " ")

C = InStrRev(Cells(A, 1), " ")

Cells(A, 2) = Left(Cells(A, 1), B)

Cells(A, 3) = Mid(Cells(A, 1), B, C - B)

Cells(A, 4) = Right(Cells(A, 1), Len(Cells(A, 1)) - C)

Next A

End Sub

img1

代码说明:-首先,给定宏名称,然后使用x定义数据范围,然后使用A,B和C定义应如何从单元格中选择值。

按F5键在Excel中运行宏。当您运行宏时,名称将分为三列

image 3

结论:这样,我们可以使用Microsoft Excel中的VBA将名称分成3列。

image 48

如果您喜欢我们的博客,请在Facebook上与您的朋友分享。另外,您也可以在Twitter上关注我们。__我们很高兴收到您的来信,请让我们知道我们如何改进,补充或创新我们的工作,并为您做得更好。写信给我们[email protected]