CO2 richtig schreiben

Bild

Betrifft: CO2 richtig schreiben von: Winfried Mommers
Geschrieben am: 18.02.2005 13:29:36

Hallo Freaks
kann ich in Excel das Wort CO2 dauerhaft so einstellen, daß nach erfolgter Eingabe automatisch die 2 tiefgestellt wird!!!!
Vielen Dank
W.Mommers

Bild


Betrifft: AW: CO2 richtig schreiben von: Josef Ehrensberger
Geschrieben am: 18.02.2005 13:37:26

Hallo Winfried!

Mit einem kleinen Makro geht das!
Kopiere den Code in das Modul der Tabelle, er gilt für Spalte "A".
Es werden alle Numerischen Zeichen tiefgestellt.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim tmp As String, n As Integer
   If Target.Column = 1 And Target.Count = 1 Then
   
   On Error GoTo ERRORHANDLER
   Application.EnableEvents = False
   
   tmp = Target
   
      For n = 1 To Len(tmp)
      
      If IsNumeric(Mid(tmp, n, 1)) Then _
               Target.Characters(n, 1).Font.Subscript = True
               
      Next
    
   End If
ERRORHANDLER:
Application.EnableEvents = True
End Sub



Gruß Sepp

P.S.: Rückmeldung nicht vergessen!


Bild


Betrifft: AW: CO2 richtig schreiben von: Winfried Mommers
Geschrieben am: 21.02.2005 08:19:46

Hallo Sepp

hat soweit super funktioniert !!!
Ich habe diese "Einstellung" aber nur in dieser Mappe bzw. in diesem
Tabellenblatt ?? Für Excel generell läßt sich das nicht einstellen ?!?!?

Vielen Dank
Winfried


 Bild

Beiträge aus den Excel-Beispielen zum Thema "CO2 richtig schreiben"