Wie formatiert man Zahlen bei der Suche und Ersetzung in Excel mit Tiefstellung?
Suchen und Ersetzen alle Zahlen mithilfe von VBA in Tiefstellung formatieren
Suchen und Ersetzen Zahlen in chemischen Formeln mithilfe von Kutools für Excel in Tiefstellung formatieren
Suchen und Ersetzen alle Zahlen mithilfe von VBA in Tiefstellung formatieren
In Excel gibt es abgesehen vom Makrocode keine Möglichkeit, mit „Suchen und Ersetzen“ Text im Tiefstellungsformat zu bearbeiten.
1. Drücken Sie Alt + F11, um das Fenster Microsoft Visual Basic for Applications anzuzeigen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code in das leere Skript ein.
VBA: Suchen und Ersetzen alle Zahlen im Tiefstellungsformat formatieren
Sub SubscriptNumbers()
'UpdatebyExtendoffice20160705
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim xChar As String
Dim I As Long
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
Application.ScreenUpdating = False
For Each xCell In xRg
xTxt = xCell.Value
For I = 1 To Len(xTxt)
xChar = Mid(xTxt, I, 1)
If xChar >= "0" And xChar <= "9" Then
xCell.Characters(I, 1).Font.Subscript = True
End If
Next
Next
Application.ScreenUpdating = True
End Sub
3. Drücken Sie die F5-Taste. Es erscheint ein Kutools für Excel-Dialogfeld, das Sie auffordert, einen Arbeitsbereich auszuwählen. Siehe Screenshot:
4. Nach der Auswahl klicken Sie auf OK, und alle Zahlen in der Auswahl werden in Tiefstellung konvertiert.
Suchen und Ersetzen Zahlen in chemischen Formeln mithilfe von Kutools für Excel in Tiefstellung formatieren
Zusätzlich zum Makrocode können Sie ein praktisches Hilfsprogramm namens Tiefgestellte Zahlen in chemischen Formeln nutzen, um im Handumdrehen alle regulären Zahlen in chemischen Formeln automatisch in tiefgestellte Zeichen umzuwandeln – vorausgesetzt, Sie haben Kutools für Excel installiert.
Nachdem Sie kostenlos installiert habenKutools für Excel, gehen Sie wie folgt vor:
Wählen Sie die Zellen aus, deren Zahlen Sie als Tiefstellung formatieren möchten, und klicken Sie auf Kutools > Text > Tiefgestellte Zahlen in chemischen Formeln. Siehe Screenshot:
Ein Dialogfeld erscheint und informiert Sie darüber, wie viele Zellen konvertiert wurden – die Zahlen in den ausgewählten chemischen Formeln sind nun im Tiefstellungsformat formatiert.
Zahl in chemischer Formel in Tiefstellung konvertieren
Beste Office-Produktivitätstools
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.
- 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