How to separate words from a string

Опубликовано: 15 Апрель 2020
на канале: Learn Excel VBA Macros

Separate Words (First Name and Last Name ) from a string

You can use below VBA Macro for this task.

Sub SeparateStrings()
Dim ws As Worksheet
Dim StrName As String
Dim i As Integer
Dim Lrow As Long
Dim intComma As Integer

Set ws = ThisWorkbook.ActiveSheet

Lrow = ws.Range("A" & Rows.Count).End(xlUp).Row

For i = 4 To Lrow
StrName = ws.Cells(i, 1).Value
intComma = InStr(StrName, ",") ' this will find Comma location in string

With ws
.Cells(i, 2).Value = Mid(StrName, intComma + 2)
.Cells(i, 3).Value = Left(StrName, intComma - 1)
End With

Next i

End Sub

На этой странице сайта вы можете посмотреть видео онлайн How to separate words from a string длительностью часов минут секунд в хорошем качестве, которое загрузил пользователь Learn Excel VBA Macros 15 Апрель 2020, поделитесь ссылкой с друзьями и знакомыми, на youtube это видео уже посмотрели 34 раз и оно понравилось 3 зрителям. Приятного просмотра!