Cum se inversează numele de domeniu prin notație în Excel?
Uneori, este posibil să întâlniți o slujbă la inversarea numelui de domeniu prin notare, așa cum se arată în imaginea de mai jos, aveți trucuri pentru a o rezolva rapid? În acest articol, introduc două metode pentru a o gestiona rapid.
Inversați numele de domeniu prin notare cu VBA
Inversați șirul printr-un separator cu ordinea inversă a textului
Inversați numele de domeniu prin notare cu VBA
Iată un cod macro care vă poate ajuta, faceți următoarele în Excel:
1. presa Alt + F11 tastele pentru a activa Microsoft Visual Basic pentru aplicații fereastră.
2. clic Insera > Module, copiați și lipiți codul în scriptul gol.
VBA: inversați numele de domeniu prin notație
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. presa F5 , apare o fereastră de dialog pentru a vă reaminti să selectați o gamă pentru a lucra.
4. clic OK.
Inversați șirul printr-un separator cu ordinea inversă a textului
Dacă aveți Kutools pentru Excel, caracteristica Reverse Text Order vă poate ajuta să inversați un șir după cum aveți nevoie.
Kutools pentru Excel, cu mai mult de 120 funcții la îndemână, vă ușurează lucrările. | ||
După instalare Kutools pentru Excel, faceți următoarele: (Descărcați gratuit Kutools pentru Excel acum!)
1. Selectați șirul pe care îl utilizați, faceți clic pe Kutools > Text > Ordine inversă a textului.
2. În Text invers , selectați o opțiune pe care trebuie să o inversați pe baza textului.
3. clic Ok, iar șirurile de text au fost inversate.
Demo
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!