Sub ZahlHoch()
Dim r As Range
Dim i As Integer
For Each r In Selection.Cells
If r.Value <> Empty Then
For i = 1 To Len(r.Value)
If IsNumeric(Mid(r.Value, i, 1)) Then
r.Characters(i, 1).Font.Superscript = True
Else
r.Characters(i, 1).Font.Superscript = False
End If
Next
End If
Next
End Sub
Sub ZahlTief()
Dim r As Range
Dim i As Integer
For Each r In Selection.Cells
If r.Value <> Empty Then
For i = 1 To Len(r.Value)
If IsNumeric(Mid(r.Value, i, 1)) Then
r.Characters(i, 1).Font.Subscript = True
Else
r.Characters(i, 1).Font.Subscript = False
End If
Next
End If
Next
End Sub
Sub ZahlNormal()
Dim r As Range
Dim i As Integer
For Each r In Selection.Cells
If r.Value <> Empty Then
For i = 1 To Len(r.Value)
If IsNumeric(Mid(r.Value, i, 1)) Then
r.Characters(i, 1).Font.Superscript = False
r.Characters(i, 1).Font.Subscript = False
End If
Next
End If
Next
End Sub
Um Buchstaben in einer Excel-Legende tiefzustellen, kannst Du folgende Schritte ausführen:
ALT + F11
.Sub ZahlTief()
Dim r As Range
Dim i As Integer
For Each r In Selection.Cells
If r.Value <> Empty Then
For i = 1 To Len(r.Value)
If IsNumeric(Mid(r.Value, i, 1)) Then
r.Characters(i, 1).Font.Subscript = True
Else
r.Characters(i, 1).Font.Subscript = False
End If
Next
End If
Next
End Sub
ALT + F8
, wähle ZahlTief
aus und klicke auf "Ausführen".Makros funktionieren nicht in der Legende:
Die Schriftart sieht anders aus:
Verwendung von Chemiefonts:
Textfeld nutzen:
Beispiel für H2O:
Chemische Formeln in Diagrammen:
Shortcut für tiefgestellte Buchstaben:
Zellen formatieren:
1. Wie kann ich Buchstaben in Excel tiefstellen?
Um Buchstaben in Excel tiefzustellen, kannst Du die Formatierungsoptionen im Menü "Start" verwenden oder ein Makro wie ZahlTief
nutzen.
2. Gibt es eine Tastenkombination für tiefgestellte Buchstaben? In Excel gibt es keine spezifische Tastenkombination für tiefgestellte Buchstaben in Diagrammlegenden. Du kannst jedoch Makros erstellen und ihnen Shortcuts zuweisen, um dies zu erleichtern.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen