Herbers Excel-Forum - das Archiv

bei Eingabe von Zahlen, autom. Trennung

Bild

Betrifft: bei Eingabe von Zahlen, autom. Trennung
von: udo
Geschrieben am: 01.10.2003 23:49:02
Hallo Ihr Lieben,

hätt so spät noch kurz ein Anliegen. Ich suche einen VBA Code, der dann ins Tabellenblatt gesetzt wird, und mit Worksheet Change dann funktionieren könnte.

Ziel soll es sein in einer x-beliebigen Spalte ( z.B. " B " ) oder auch nur von B2:B1000 , egal, in diesem Bereich einen 10 - stelligen Zahlenwert einzugeben ( per Nummertastaur ), und zwar hintereinander ohne Spacetaste.

Also die Eingabe wäre z.B. 1234567892 , und die Anweisung trennt mit dann den Wert auf die folgende Weise zu :

1_234_567_892 ( die " _ " sollen Leerzeichen sein ) , also " 1 234 567 892 "
wäre dann das optimale Ergebnis.

_______________________________________________________________________

Ich muss in dieser Tabelle dort in dieser Spalte ewig viele Zahlenwerte eingeben, und würde mir die Eingabe gerne erleichtern.

Es kann auch sein , dass mal anstatt einer Zahl , an einer Position ein Buchstabe stehen soll, z.B. : 1 234 567 H15

Hättet ihr da eine Idee, oder ein ähnliches Makro, welches ich an meine Tabelle dann anpassen könnte.

Vielen lieben Dank, schon mal für eure Unterstützung

Gruß udo

...

Bild

Betrifft: AW: bei Eingabe von Zahlen, autom. Trennung
von: heinz
Geschrieben am: 02.10.2003 02:23:33
interessantes problem - ist mir nix besseres eingefallen
bei zellen formatieren tatsächlich nix gefunden

Private Sub Worksheet_Change(ByVal Target As Range)
Dim eingabe As String
eingabe = Target.Text
If Len(eingabe) = 10 Then
Target = Mid(eingabe, 1, 1) & " " & Mid(eingabe, 2, 3) & " " & Mid(eingabe, 5, 3) & " " & Mid(eingabe, 8, 3)
End If
End Sub

Bild

Betrifft: Vielen lieben Dank Heinz, konnte mich erst ...
von: udo
Geschrieben am: 02.10.2003 20:04:29
... jetzt melden, werde es gleich mal probieren, sieht aber auf den ersten Blick schon ganz vielversprechend aus.

Mit Target und Length hatte ich auch schon verzweifelt rum versucht.

Danke dir, erstmal, ich meld mich nochmal zurück

Gruß udo
Bild

Betrifft: ok ot
von: heinz
Geschrieben am: 03.10.2003 11:15:39
 Bild
Excel-Beispiele zum Thema " bei Eingabe von Zahlen, autom. Trennung"
Zelleingaben speichern Bei falscher Eingabe alten Wert wiederherstellen
Eingabeerleichterung bei Zeitformaten Nichtnumerische Eingaben verhindern
Eingabe in Großbuchstaben wandeln Eingaben aufaddieren
Automatisches Komplettieren einer Zelleingabe Nur numerische Eingaben zulassen
Vereinfachte Zeiteingabe Datumseingabe in Textfeld erzwingen