Hur hittar och ersätter jag snabbt tecken med superscript i Excel?
Hitta och ersätt med upphöjd med funktionen Sök och ersätt
Hitta och ersätt med upphöjd av VBA
Hitta och ersätt med upphöjd med funktionen Sök och ersätt
Egentligen kan du använda Sök och ersätt för att hitta texten och sedan ersätta med upphöjd skrift.
1. Välj det område du vill hitta och ersätta arbete för och tryck Ctrl + H att öppna Sök och ersätt dialog.
2. I Sök och ersätt dialog, klicka ersätta fliken och skriv sedan in texten du vill hitta i Hitta det textruta. Se skärmdump:
3. Gå sedan till Ersätt med textbox, skriv in texten du vill ersätta med, notera, håll andra och tryck sedan på 0179 nycklar på Nummertavla för att ange det upphöjda numret 3. Se skärmdump:
4. klick Ersätt alla. Och en dialogruta dyker upp för att påminna dig om hur många byten som har gjorts. Se skärmdump:
Dricks: Men med den här metoden kan du bara upphöja nummer 2 genom att trycka på 0178 och 3 med 0179.
Hitta och ersätt med upphöjd av VBA
Med funktionen Sök och ersätt kan endast ersätta numret med upphöjd. Om du vill ersätta bokstaven med upphöjd som nedan skärmdump, kan du använda VBA-kod för att lösa det.
1. Tryck Alt + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.
2. klick Insert > Modulerna, och klistra in nedanstående VBA-kod i skriptet.
VBA: Hitta och ersätt med upphöjd skrift
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. Tryck F5 för att köra koden, och en dialogruta dyker upp för att påminna dig om att välja ett område. Se skärmdump:
4. klick OK, har det specifika tecknet i den specifika strängen konverterats till att vara upphöjd i markeringen. Se skärmdump:
Tips: i koden, “YL3” är strängen du vill hitta från, och (1, 1) indikerar att konvertera det första tecknet i strängen, om du vill konvertera de två första tecknet kan du ändra det som (1, 1), om du vill konvertera 2 tecken från det andra tecknet i strängen kan du ändra det som (1, 2).
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!