Hvordan finder og erstatter du hurtigt tegn med superscript i Excel?
Find og erstat med superscript ved Find og erstat funktion
Find og erstat med superscript af VBA
Find og erstat med superscript ved Find og erstat funktion
Faktisk kan du bruge Find og erstat for at finde teksten og derefter erstatte det med superscript-format.
1. Vælg det område, du vil finde og udskifte arbejde for, og tryk på Ctrl + H at åbne Søg og erstat dialogen.
2. i Søg og erstat dialog, klik udskifte fanen, og indtast derefter den tekst, du vil finde i Find hvad tekstboks. Se skærmbillede:
3. Så gå til Erstat med tekstboks, indtast den tekst, du vil erstatte med, læg mærke til, hold nede andre og tryk derefter på 0179 tasterne på Nummerplade for at indtaste overskrift nummer 3. Se skærmbillede:
4. klik Erstat alle. Og der vises en dialog for at minde dig om, hvor mange udskiftninger der er udført. Se skærmbillede:
Tip: Men med denne metode kan du kun hæve nummer 2 ved at trykke på 0178 og 3 ved 0179.
Find og erstat med superscript af VBA
Med funktionen Find og erstat kan kun erstatte nummeret med superscript. Hvis du vil erstatte bogstavet med superscript som vist nedenstående skærmbillede, kan du anvende VBA-kode for at løse det.
1. Trykke Alt + F11 taster for at åbne Microsoft Visual Basic til applikationer vindue.
2. klik indsatte > Moduler, og indsæt under VBA-koden i scriptet.
VBA: Find og erstat med superscript-format
Sub DoConvert()
'UpdatebyExtendoffice20160705
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Select a range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xCell.Value = "YL3" Then
xCell.Characters(1, 1).Font.Superscript = True
End If
Next
End Sub
3. Trykke F5 tast for at køre koden, og der vises en dialogboks, der minder dig om at vælge et interval. Se skærmbillede:
4. klik OK, er det specifikke tegn i den specifikke streng konverteret til at være superscript-format i markeringen. Se skærmbillede:
Tip: i koden, “YL3”Er den streng, du vil finde fra, og (1, 1) angiver at konvertere strengets første 1 tegn, hvis du vil konvertere de to første tegn, kan du ændre det som (1, 2). Hvis du vil konvertere 1 tegn fra det andet tegn i strengen, kan du ændre det som ( 2, 1).
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!