KutoolsforOffice — Eine Lösung, fünf leistungsstarke Tools.Mehr erreichen mit weniger Aufwand.März-Aktion: 20 % Rabatt

Wie formatiert man in Excel schnell ein Zeichen aus der Suchen-und-Ersetzen-Funktion als Hochstellung?

AutorSun Änderungsdatum
Zeichen suchen und durch hochgestelltes Zeichen ersetzen
In Excel können wir mithilfe der Suchen und Ersetzen-Funktion schnell einen bestimmten Wert durch einen anderen ersetzen. Haben Sie sich jedoch schon einmal mit dem Problem herumgeschlagen, ein bestimmtes Zeichen innerhalb einer bestimmten Textzeichenfolge zu finden und dieses im Hochstellungsformat zu ersetzen – beispielsweise „YL3“ zu suchen und wie im folgenden Screenshot gezeigt durch „YL3“ mit Hochstellung zu ersetzen? Natürlich können Sie dies manuell Suchen und Ersetzen, doch dieser Ansatz kostet zu viel Zeit. Gibt es eine Möglichkeit, in Excel schnell eine Ersetzung durch Hochstellung durchzuführen? Folgen Sie diesem Artikel, und Sie erhalten die Antwort.

Suchen und Ersetzen mit Hochstellung mithilfe der Suchen und Ersetzen-Funktion

Suchen und Ersetzen mit Hochstellung mithilfe von VBA

blauer Pfeil nach rechts in Sprechblase Suchen und Ersetzen mit Hochstellung mithilfe der Suchen und Ersetzen-Funktion

Tatsächlich können Sie „Suchen und Ersetzen“ nutzen, um den Text zu finden und ihn anschließend durch eine hochgestellte Formatierung zu ersetzen.

1. Wählen Sie den Bereich aus, für den Sie die Suchen und Ersetzen-Funktion verwenden möchten, und drücken Sie Strg + H, um das Dialogfeld zu öffnen.

2. Klicken Sie im Suchen und Ersetzen-Dialogfeld auf die Registerkarte Ersetzen und geben Sie den gesuchten Text in das Feld Suchen nach ein. Siehe Screenshot:
Geben Sie das Zeichen in das Feld „Suchen nach“ ein

3. Wechseln Sie dann zum Feld Ersetzen durch, geben Sie den gewünschten Ersetzungstext ein, halten Sie dabei die Alt-Taste gedrückt und drücken Sie anschließend auf dem Ziffernblock die Tasten 0179, um die hochgestellte Zahl 3 einzugeben. Siehe Screenshot:
Halten Sie die Alt-Taste gedrückt und drücken Sie anschließend auf dem Ziffernblock die Tasten 0179, um die hochgestellte Zahl einzugeben

4. Klicken Sie auf Alle ersetzen. Anschließend erscheint ein Dialogfeld, das Ihnen anzeigt, wie viele Ersetzungen durchgeführt wurden. Siehe Screenshot:
Klicken Sie auf „Alle ersetzen“, um das Ergebnis zu erhalten

Tipp: Mit dieser Methode können Sie jedoch nur die Zahlen 2 (durch Drücken von 0178) und 3 (durch 0179) als hochgestellt formatieren.

Ein Screenshot von kutools for excel KI

Entfesseln Sie die Magie von Excel mit KUTOOLS AI

  • Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
  • Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
  • VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
  • Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
  • Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
Erweitern Sie Ihre Excel-Fähigkeiten mit KI-gestützten Werkzeugen.Jetzt herunterladenund erleben Sie Effizienz wie nie zuvor!

blauer Pfeil nach rechts in Sprechblase Suchen und Ersetzen mit Hochstellung mithilfe von VBA

Mit der Suchen-und-Ersetzen-Funktion können nur Zahlen durch hochgestellte Zeichen ersetzt werden. Möchten Sie Buchstaben – wie im folgenden Screenshot gezeigt – hochstellen, verwenden Sie hierfür einen VBA-Code.

1. Drücken Sie die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden VBA-Code in das Skript ein.

VBA: Suchen und Ersetzen mit Hochstellungsformatierung

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

Kopieren Sie den Code und fügen Sie ihn in das Modul ein

3. Drücken Sie die Taste F5, um den Code auszuführen. Anschließend erscheint ein Dialogfeld, in dem Sie aufgefordert werden, einen Bereich auszuwählen. Siehe Screenshot:
VBA-Code zum Auswählen des Datenbereichs

4. Klicken Sie auf OK, damit das entsprechende Zeichen innerhalb der angegebenen Zeichenfolge im markierten Bereich in Hochstellung konvertiert wird. Siehe Screenshot:
Das spezifische Zeichen wird in das hochgestellte Format konvertiert

Tipp: Im Code steht „YL3“ für die zu suchende Zeichenfolge, und (1, 1) gibt an, dass das erste Zeichen der Zeichenfolge konvertiert werden soll. Wenn Sie die ersten beiden Zeichen konvertieren möchten, ändern Sie dies in (1, 2). Möchten Sie hingegen das erste Zeichen ab dem zweiten Zeichen der Zeichenfolge konvertieren, ändern Sie es in (2, 1).

Beste Office-Produktivitätstools

🤖KUTOOLS AI-Assistent: Revolutionieren Sie Datenanalyse basierend auf:Intelligente Ausführung   |  Code generieren|  benutzerdefinierte Formeln erstellen  |  Daten analysieren und Diagramme erstellen|  Erweiterte Funktionen aufrufen
Beliebte Funktionen:Suchen, hervorheben oder Doppelte markieren   |  Leere Zeilen löschen   |  Spalten kombinieren oder Zellen ohne Datenverlust   |   Runden ohne Formel...
Erweiterte SVERWEIS:VLookup mit mehreren Kriterien  |  VLookup mit mehreren Werten  |   VLookup über mehrere Arbeitsblätter hinweg   |   Fuzzy Match....
Erweiterte Dropdown-Liste:Schnell eine Dropdown-Liste erstellen   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl-Dropdown-Liste....
Spalten-Manager:Eine bestimmte Anzahl von Spalten hinzufügen|Spalten verschieben|Sichtbarkeitsstatus ausgeblendeter Spalten umschalten|Bereiche & Spalten vergleichen...
Hervorgehobene Funktionen:Gitterfokus   |  Entwurf   |Erweiterte Formelleiste   | Arbeitsmappen- & Blatt-Manager   |  Ressourcenbibliothek(AutoText)|  Datumsauswahl   |  Arbeitsblätter konsolidieren  |  Verschlüsseln/Zellen entschlüsseln   | E-Mails per Liste versenden   |  Super Filter   |   Spezialfilter(Zellen mit fettgedruckter Schrift filtern/kursiv/durchgestrichen...) ...
Top-15-Toolsets:12-Text-Tools(Text hinzufügen,Bestimmte Zeichen löschen, ...)|   50+-Diagramm-Typen(Gantt-Diagramm, ...)|   40+ Praktische Formeln(Alter basierend auf dem Geburtstag berechnen, ...)|   19-Einfüge-Tools(QR-Code einfügen,Bild aus Pfad einfügen, ...)|   12-Konvertierungs-Tools(In Wörter umwandeln,Wechselkursumrechnung, ...)|   7-Vereinigen/Aufteilen-Tools(Erweiterte Zeilen zusammenführen,Zellen aufteilen, ...)|... und mehr
Verwenden Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und 40+ weitere Sprachen!

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...


Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
  • Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!

Alle Kutools-Add-Ins – ein Installationsprogramm

Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
  • Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
  • Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
  • 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
  • Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins