Hoe domeinnaam omkeren door notatie in Excel?
Soms kun je een taak tegenkomen bij het omkeren van de domeinnaam door notatie zoals onderstaand screenshot, heb je trucs om het snel op te lossen? In dit artikel introduceer ik twee methoden om er snel mee om te gaan.
Omgekeerde domeinnaam door notatie met VBA
Omgekeerde tekenreeks door een scheidingsteken met omgekeerde tekstvolgorde
Omgekeerde domeinnaam door notatie met VBA
Hier is een macrocode die u kan helpen, doe het als volgt in Excel:
1. druk op Alt + F11 toetsen om het Microsoft Visual Basic voor toepassingen venster.
2. klikken Invoegen > Module, kopieer en plak de code in het lege script.
VBA: omgekeerde domeinnaam door notatie
Sub Reverse()
'UpdatebyExtendoffice2017115
Dim xArr() As String
Dim xSplitStr As String
Dim xVal As String
Dim xRg As Range
Dim xCell As Range
Dim xIndex As Long
On Error Resume Next
Set xRg = Application.InputBox("Select cells:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
xSplitStr = "."
For Each xCell In xRg
If InStr(xCell.Value, xSplitStr) = 0 Then GoTo xBreak
xVal = ""
xArr = Split(xCell.Value, xSplitStr)
xIndex = UBound(xArr)
xVal = xArr(xIndex)
Do
xIndex = xIndex - 1
xVal = xVal & xSplitStr & xArr(xIndex)
Loop While xIndex > 0
xCell.Value = xVal
xBreak:
Next
Application.ScreenUpdating = True
End Sub
3. druk op F5 -toets, verschijnt er een dialoogvenster om u eraan te herinneren een bereik te selecteren om te werken.
4. klikken OK.
Omgekeerde tekenreeks door een scheidingsteken met omgekeerde tekstvolgorde
Als je Kutools voor Excel hebt, kan de functie Omgekeerde tekstvolgorde je helpen een tekenreeks om te keren als je dat nodig hebt.
Kutools for Excel, met meer dan 120 handige functies, maakt uw werk gemakkelijker. | ||
Na het installeren van Kutools voor Excel, doe het als volgt: (Download nu Kutools voor Excel!)
1. Selecteer de tekenreeks die u gebruikt en klik Kutools > Tekst > Omgekeerde tekstvolgorde.
2. In de Tekst omkeren dialoogvenster, selecteert u een optie waarop u de tekst wilt omkeren op basis van.
3. klikken Oken de tekstreeksen zijn omgekeerd.
Demo
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!