Hoe snel een teken vinden en vervangen door superscript in Excel?
Zoeken en vervangen met superscript via de functie Zoeken en Vervangen
Zoeken en vervangen met superscript via VBA
Zoeken en vervangen met superscript via de functie Zoeken en Vervangen
Eigenlijk kun je Zoeken en Vervangen gebruiken om de tekst te vinden en deze vervolgens te vervangen in superscriptformaat.
1. Selecteer het bereik waarvoor je Ctrl + H wilt gebruiken en druk op Zoeken en Vervangen om het dialoogvenster te openen.
2. In het Zoeken en Vervangen dialoogvenster, klik op Vervangen tab, en voer vervolgens de tekst die je wilt zoeken in het veld Zoeken naar in. Zie onderstaande schermafbeelding:
3. Ga vervolgens naar Vervangen door tekstvak, voer de tekst in waarmee je wilt vervangen, let op, houd de Alt toets ingedrukt en druk vervolgens op 0179 toetsen op het Numerieke toetsenbord om het superscriptnummer 3 in te voeren. Zie onderstaande schermafbeelding:
4. Klik op Alles vervangen. Er verschijnt een dialoogvenster dat je eraan herinnert hoeveel vervangingen zijn uitgevoerd. Zie onderstaande schermafbeelding:
Tip: Met deze methode kun je alleen het getal 2 als superscript invoeren door 0178 in te voeren, en 3 door 0179.
Ontdek de Magie van Excel met Kutools AI
- Slimme Uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak diagrammen – allemaal aangestuurd door eenvoudige commando's.
- Aangepaste Formules: Genereer op maat gemaakte formules om uw workflows te versnellen.
- VBA-codering: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules gemakkelijk.
- Tekstvertaling: Overbrug taalbarrières binnen uw spreadsheets.
Zoeken en vervangen met superscript via VBA
Met de functie Zoeken en Vervangen kun je alleen getallen vervangen door superscript. Als je letters wilt vervangen door superscript zoals in onderstaande schermafbeelding wordt getoond, kun je VBA-code gebruiken om dit op te lossen.
1. Druk op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module, en plak de volgende VBA-code in het script.
VBA: Zoeken en vervangen met superscriptformaat
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. Druk op de F5 toets om de code uit te voeren, en er verschijnt een dialoogvenster dat je eraan herinnert een bereik te selecteren. Zie onderstaande schermafbeelding:
4. Klik op OK, het specifieke teken in de specifieke tekststring is omgezet naar superscriptformaat in de selectie. Zie onderstaande schermafbeelding:
Tip: in de code is “YL3” de tekst waarin je wilt zoeken, en (1, 1) geeft aan dat het eerste teken van de string wordt geconverteerd. Als je de eerste twee tekens wilt converteren, kun je dit wijzigen in (1, 2). Als je één teken wilt converteren vanaf het tweede teken van de string, kun je dit wijzigen in (2, 1).
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen