Jak odwrócić nazwę domeny według notacji w programie Excel?
Czasami możesz napotkać zadanie odwrócenia nazwy domeny za pomocą notacji, jak pokazano na poniższym zrzucie ekranu, czy masz jakieś sztuczki, aby szybko go rozwiązać? W tym artykule przedstawię dwie metody szybkiego radzenia sobie z tym.
Odwróć nazwę domeny według notacji z VBA
Odwróć ciąg za pomocą separatora z odwrotną kolejnością tekstu
Odwróć nazwę domeny według notacji z VBA
Oto kod makra, który może ci pomóc, wykonaj następujące czynności w programie Excel:
1. naciśnij Alt + F11 klawisze, aby włączyć Microsoft Visual Basic for Applications okno.
2. kliknij wstawka > Moduł, skopiuj i wklej kod do pustego skryptu.
VBA: Odwróć nazwę domeny według notacji
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. naciśnij F5 klawisz, pojawi się okno dialogowe przypominające o wybraniu zakresu do pracy.
4. kliknij OK.
Odwróć ciąg za pomocą separatora z odwrotną kolejnością tekstu
Jeśli masz Kutools dla programu Excel, funkcja Odwróć kolejność tekstu może pomóc Ci odwrócić ciąg znaków, jeśli potrzebujesz.
Kutools dla programu Excel, ponad 120 przydatne funkcje, ułatwiają pracę. | ||
Po zainstalowaniu Kutools dla programu Excel, wykonaj poniższe czynności: (Bezpłatne pobieranie Kutools dla programu Excel teraz!)
1. Wybierz ciąg, którego używasz, kliknij Kutools > Tekst > Odwróć kolejność tekstu.
2. w Odwróć tekst wybierz jedną opcję, na podstawie której chcesz odwrócić tekst.
3. kliknij Ok, a ciągi tekstowe zostały odwrócone.
Demo
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!