Anzeige
Archiv - Navigation
796to800
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
796to800
796to800
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

/ einfügen an bestimmter Zelle wenn CR Taste......

/ einfügen an bestimmter Zelle wenn CR Taste......
03.09.2006 11:38:32
Andreas
Hallo,
ich habe hier jede Menge Zahlenstrings einzugeben. Es handelt sich dabei um 6 Zahlen, wobei nach der 2 Zahl ein / eingefügt werden muss. Damit man nicht immer Shift+/ dazwischentippen muss, dachte ich mir es wäre doch sicher möglich dies per VBA zu klären. Wer kann mir da ein passenden Code zuschleussen?
Gruß Andreas

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: / einfügen an bestimmter Zelle wenn CR Taste..
03.09.2006 11:45:19
Josef
Hallo Andreas!
Warum nimmst du nicht die "/" auf dem Nummernblock?
Gruß Sepp

AW: / einfügen an bestimmter Zelle wenn CR Taste..
03.09.2006 12:35:56
Andreas
Hallo Josef,
beim PC okay, beim Laptop eher umständlich :-).
Gruß Andreas
AW: / einfügen an bestimmter Zelle wenn CR Taste......
03.09.2006 11:48:30
ede
hallo andreas,
erfasse alle deine zahlenstrings, markiere dann alle und las das makro laufen

Sub test()
Dim z As Range
For Each z In Selection
z.NumberFormat = "@"
z.Value = Mid(z.Value, 1, 2) & "/" & Mid(z.Value, 3, Len(z.Value) - 2)
Next z
End Sub

gruss
AW: / einfügen an bestimmter Zelle wenn CR Taste..
03.09.2006 12:28:00
Andreas
Hi,
danke vorab. Das Makro geht. Da werde ich das Makro einer Schaltfläche zuweisen und gut ist.
Danke Ede
Anzeige

249 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige