Hur omvänd domännamn genom notering i Excel?
Ibland kan du stöta på ett jobb med att vända domännamnet genom notering, som visas nedan, har du några knep för att snabbt lösa det? I den här artikeln introducerar jag två metoder för att snabbt hantera det.
 |
 |
 |
Omvänd domännamn med notering med VBA
Omvänd sträng med en avgränsare med omvänd textordning
Omvänd domännamn med notering med VBA
Här är en makrokod som kan hjälpa dig, gör så här i Excel:
1. Tryck Alt + F11 för att aktivera Microsoft Visual Basic för applikationer fönster.
2. klick Insert > Modulerna, kopiera och klistra in koden i det tomma skriptet.
VBA: Omvänd domännamn efter notation
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. Tryck F5 En dialogruta dyker upp för att påminna dig om att välja ett intervall som ska fungera.
4. klick OK.
Omvänd sträng med en avgränsare med omvänd textordning
Om du har Kutools för Excel kan funktionen Omvänd textordning hjälpa dig att vända en sträng som du behöver.
| Kutools för Excel, med mer än 120 praktiska funktioner, underlättar dina jobb. | ||
När du har installerat Kutools för Excel, gör så här: （Gratis nedladdning Kutools för Excel nu!)
1. Välj strängen du använder, klicka Kutools > text > Omvänd textordning.
2. I Omvänd text väljer du ett alternativ som du behöver vända text baserat på.
3. klick Ok, och textsträngarna har vänts om.
demo
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
