Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Doppelpunkt statt Komma

157 views
Skip to first unread message

Volker Leifeld

unread,
Sep 14, 1999, 3:00:00 AM9/14/99
to
Hallo NG,

ich habe das Problem, daß ich in einer Tabelle immer wieder
sehr viele Uhrzeiten eingeben muß und daß es total nervt
ständig diesen blöden Doppelpunkt zu tippen :-(.

Gibt es eine elegante Möglichkeit eine Taste auf dem
Ziffernblock temporär (d. h. nur in dieser Vorlage) mit dem
Doppelpunkt zu belegen. Autokorrektur ist leider kein
Workaround, weil die Anwender immer wieder vergessen
den Autokorrektur-Eintrag zurück zu nehmen.

Vielen Dank im voraus

Gruß Volker

Konrad

unread,
Sep 14, 1999, 3:00:00 AM9/14/99
to
Hi Volker,

ich habe das Problem gelöst indem ich zwei Komma eintippe und mit der
Autokorrektur gegen einen Doppelpunkt tauschen lasse. Klappt gut.

Jörg


Volker Leifeld <volker....@online-club.de> schrieb in im Newsbeitrag:
7rla8n$n5b$1...@news04.btx.dtag.de...

Volker Leifeld

unread,
Sep 14, 1999, 3:00:00 AM9/14/99
to
Hallo Konrad,

nicht schlecht, man muß eben nur drauf kommen.

Danke Volker

Konrad schrieb in Nachricht <93731217...@news.thyssen.com>...

Oliver Schneider

unread,
Sep 15, 1999, 3:00:00 AM9/15/99
to
noch eine elegante Lösung:

Private Sub Workbook_Open()
Application.AutoCorrect.AddReplacement What:=",", Replacement:=":"
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.AutoCorrect.DeleteReplacement What:=","
End Sub


--
Gruß
O. Schneider
Oliver-S...@gmx.de
(Office 2000 / NT4.0 SP5)


Ulli

unread,
Sep 15, 1999, 3:00:00 AM9/15/99
to
Hi!
ich würde es so machen:
geh in den codeeditor doppelklicke im projektexplorer auf das
entsprechende tabellenblatt in der der der doppelpunkt erscheinen soll.
und trage dann folgendes ein:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)

If InStr(1, Selection(1), ",,") > 0 And Selection.Count = 1 Then
Selection(1).Value = Left(Selection(1), 2) & ":" &
Right(Selection(1), 2)
End If

End Sub

die beiden kommata kannst du durch irgendwelche anderen zeichen
ersetzen.
in diesem falle muß die uhrzeit immer 4stellig geschrieben werden.

bye
Ulli.


Volker Leifeld schrieb:

0 new messages