How to separate words from a string

Publié le: 15 avril 2020
sur la chaîne: Learn Excel VBA Macros
34
3

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


Sur cette page du site, vous pouvez voir la vidéo en ligne How to separate words from a string durée heure minute seconde en bonne qualité , qui a été Téléchargé par l'utilisateur Learn Excel VBA Macros 15 avril 2020, Partagez le lien avec vos amis et connaissances, sur youtube cette vidéo a déjà été regardée 34 fois et il a aimé 3 téléspectateurs. Bon visionnage!