Omkeren van Namen In Place

George heeft vaak te werken met gegevens die door andere mensen. In het werken met deze gegevens die hij nodig heeft om een ​​naam te zetten, zegt Jan Jansen, zodat de laatste naam is in de eerste, zoals in Bloggs, Joe. George begrijpt dat hij een formule kan gebruiken om de naam omkering te doen, maar hij moet het doen in dezelfde cel waarin de naam woont. Hij vraagt ​​zich af of er een ingebouwde opdracht die deze taak zal uitvoeren.

Nee, er is geen ingebouwde commando om het te doen. U kunt echter wel een macro maken die de omschakeling voor u zal doen. Deze macro kan vervolgens worden toegewezen aan een sneltoets of geplaatst op een werkbalk zodat deze eenvoudig kan worden geopend. Hier is een eenvoudige macro dat de omschakeling zal doen:

Sub ReverseNames ()
Dim x As Integer
Dim sCell als Koord
Dim sLast als Koord
Dim sFirst als Koord
Dim rCell als Waaier

Voor Elke rCell In Selection
sCell = rCell.Value
x = InStr (sCell, "")
Als x> 0 Then
sFirst = Links (sCell, x - 1)
sLast = Mid (sCell, x + 1)
rCell.Value = sLast & "," & sFirst
End If
Volgende
Stel rCell = Nothing
End Sub

Om de macro te gebruiken, selecteert u het bereik van de cellen die u wilt beïnvloeden en vervolgens uitvoeren. De macro zoekt naar een ruimte in de cel doordacht en voor speelt de voornaam en alles na speelt de achternaam zijn. Deze twee elementen worden omgekeerd, een komma zetten tussen hen en terug in de cel gevuld.

ExcelTips is uw bron voor kosteneffectieve Microsoft Excel training. Deze tip (3812) is van toepassing op Microsoft Excel 97, 2000, 2002 en 2003. U kunt een versie van deze tip voor de ribbon-interface van Excel (Excel 2007 en later) vindt u hier: Reversing namen in Place.