Как перевернуть доменное имя с помощью нотации в Excel?
Иногда вам может понадобиться перевернуть доменное имя с помощью нотации, как показано на скриншоте ниже. Есть ли у вас какие-либо хитрости для быстрого решения этой задачи? В этой статье я представляю два метода для быстрого выполнения этой операции.
 |  |  |
Переворот доменного имени с помощью нотации через VBA
Переворот строки по разделителю с помощью функции «Обратный порядок текста»
Переворот доменного имени с помощью нотации через VBA
Вот макрос, который может помочь вам. Пожалуйста, следуйте инструкциям ниже в Excel:
1. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
2. Нажмите Вставить > Модуль, скопируйте и вставьте код в пустой скрипт.
VBA: Переворот доменного имени с помощью нотации
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. Нажмите F5 клавишу, появится диалоговое окно, напоминающее выбрать диапазон для работы.
4. Нажмите OK.
Переворот строки по разделителю с помощью функции «Обратный порядок текста»
Если у вас есть Kutools для Excel, функция «Обратный порядок текста» поможет вам перевернуть строку так, как вам нужно.
После установки Kutools для Excel, пожалуйста, сделайте следующее: （Бесплатная загрузка Kutools для Excel прямо сейчас!)
1. Выберите строку, которую вы используете, нажмите Kutools > Текст > Обратный порядок текста.
2. В Обратный текст диалоговом окне выберите нужную опцию для переворота текста на основе.
3. Нажмите Ok, и текстовые строки будут перевернуты.
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с помощью Kutools для Excel и ощутите эффективность на новом уровне. Kutools для Excel предлагает более300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы выбрать функцию, которая вам нужнее всего...
Office Tab добавляет вкладки в Office и делает вашу работу намного проще
- Включите режим вкладок для редактирования и чтения в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна вместо новых отдельных окон.
- Увеличьте свою продуктивность на50% и уменьшите количество щелчков мышью на сотни ежедневно!
Все надстройки Kutools. Один установщик
Пакет Kutools for Office включает надстройки для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro — идеально для команд, работающих в разных приложениях Office.
- Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
- Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
- Совместная работа — максимальная эффективность между приложениями Office
- 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек