Your technology certification is waiting. Enroll in Cloud Class ®
Dim lngLastRow As Long
Dim lngRow As Long
Dim strParts() As String
Const DATA_COL = "A"
lngLastRow = Range(DATA_COL & "65536").End(xlUp).Row
For lngRow = 1 To lngLastRow
strParts = Split(Cells(lngRow, DATA_COL).Value, ",")
If UBound(strParts) > 0 Then
Cells(lngRow, DATA_COL).Value = strParts(1) & " " & strParts(0)
Open in new window
This course will introduce you to SQL Server Core 2016, as well as teach you about SSMS, data tools, installation, server configuration, using Management Studio, and writing and executing queries.
I find that it leaves a zero...
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.