Bagaimana cara membalikkan nama domain dengan notasi di Excel?
Terkadang, Anda mungkin menemukan pekerjaan untuk membalikkan nama domain dengan notasi seperti gambar di bawah ini, apakah Anda punya trik untuk menyelesaikannya dengan cepat? Pada artikel ini, saya memperkenalkan dua metode untuk mengatasinya dengan cepat.
 |
 |
 |
Balik nama domain dengan notasi dengan VBA
Membalikkan string dengan pemisah dengan Reverse Text Order
Balik nama domain dengan notasi dengan VBA
Berikut adalah kode makro yang dapat membantu Anda, lakukan hal berikut di Excel:
1. tekan Alt + F11 kunci untuk mengaktifkan Microsoft Visual Basic untuk Aplikasi jendela.
2. klik Menyisipkan > Modul, salin dan tempel kode ke skrip kosong.
VBA: Membalik nama domain dengan notasi
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. tekan F5 kunci, dialog muncul untuk mengingatkan Anda memilih rentang yang akan digunakan.
4. klik OK.
Membalikkan string dengan pemisah dengan Reverse Text Order
Jika Anda memiliki Kutools for Excel, fitur Urutan Teks Terbalik dapat membantu Anda membalikkan string sesuai kebutuhan.
| Kutools for Excel, dengan lebih dari 120 fungsi praktis, membuat pekerjaan Anda lebih mudah. | ||
Setelah menginstal Kutools for Excel, lakukan seperti di bawah ini: (Download Gratis Kutools for Excel Sekarang!)
1. Pilih string yang Anda gunakan, klik Kutools > Teks > Urutan Teks Terbalik.
2. Dalam Teks terbalik dialog, pilih satu opsi yang Anda perlukan untuk membalikkan teks berdasarkan.
3. klik Ok, dan string teks telah dibalik.
Demo
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Canggih untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Office Tab Menghadirkan antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
