AW: Slash automatiscvh einfügen
08.09.2007 12:43:24
Daniel
Hi
allerdings muss man wissen, daß das nur die Anzeige verändert, nicht aber den tatsächlichen Zellwert, dieser bleibt dabei nämlich eine normale Zahl, one den Slash.
Wenn der eingebebene Wert noch von weitern Funtkionen abgefragt wird (SVWERWEIS, VERGLEICH), könnte es ein Problem geben, bzw man muss diese Funtkionen aufwendig ergänzen, damit es wieder passt.
In diesem Fall müsste der Slash per Makro eingefügt werden, weil nur dadurch wird der Wert tatsächlich verändert. Das Makro gehört ins Modul der betroffenen Tabelle.
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("a12:A31")) Is Nothing Then Exit Sub
If Target.Cells.Count > 1 Then Exit Sub
If Not IsNumeric(Target) Then Exit Sub
If Not Int(Target) = Target Then Exit Sub
If Target
die einfachst Möglichkeit wäre aber folgende:
Hast du weiterhin einen Zahlenblock mit Rechenzeichen (Mal, Minus, Plus, Geteilt) auf deiner Tastatur?
dann verwende die "Geteilt"-Taste (das Minus mit den zwei Punkten). Die fügt normalerweise den Slash ein.
Gruß, Daniel