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

Übernehmen bis zum Trennzeichen

Forumthread: Übernehmen bis zum Trennzeichen

Übernehmen bis zum Trennzeichen
21.10.2004 15:12:33
Frank
Hallo Excelperten!
Ist es möglich, folgendes in UserForm zu realisieren? Beispiel: In Zelle A1 steht folgendes: "Peter, Müller, München, 96253" etc. Nun möchte ich die Werte gerne getrennt in Textboxen einer Userform übernehmen. Also in Textbox1 sollte Peter stehen, in Textbox2 Müller usw. Ist sowas mit Excel machbar, auch für größere Tabellen mit ein paar hundert Einträgen? Vielleicht hat ja jemand von Euch eine Idee.
Irgendwie so...
UserForm1.Textbox1.Value = Tabelle1.Range("A1").Value (bis zum Komma?)
UserForm1.Textbox2.Value = Tabelle1.Range("A1").Value (zwischen Komma 1 und Komma 2)
usw.
MfG
Frank
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Übernehmen bis zum Trennzeichen
ChrisL
Hi Frank
Irgendwie so... ;-)

Private Sub CommandButton1_Click()
Dim strText As String
strText = "Peter, Müller, München, 96253"
TextBox1 = Left(strText, InStr(strText, ",") - 1)
strText = Right(strText, Len(strText) - InStr(strText, ","))
TextBox2 = Left(strText, InStr(strText, ",") - 1)
strText = Right(strText, Len(strText) - InStr(strText, ","))
TextBox3 = Left(strText, InStr(strText, ",") - 1)
strText = Right(strText, Len(strText) - InStr(strText, ","))
TextBox4 = strText
End Sub

Gruss
Chris
Anzeige
AW: Übernehmen bis zum Trennzeichen
21.10.2004 15:52:44
Frank
Hallo Chris,
das ist exakt das, was ich erreichen wollte! Vielen Dank!!! Ich verstehe es zwar noch nicht ganz, aber es funktioniert... einfach klasse!
Gruß
Frank
;

Forumthreads zu verwandten Themen

Teile von Zahlen auslesen und einfügen
Zahlen

Hallo Leute,
ich habe ein Problem mit Zahlenformaten.
In meiner Tabelle steht der Text '4917234598' (natürlich viele solcher Zahlen untereinander.
Jetzt möchte ich, daß diese Zahl (später eine ganze Spalte) über Makro so aufbereitet wird, daß aus '4917234598' 017234598 wird.
08.08.2008 22:57:00
Thread-ID: 1000426
21 Beiträge
Formel, rechts #### bis leer Zeichen
mehmet

Hallo Forum,
in Zelle B2 habe ich z.B. "ABC 314 " stehen.
Nun möchte ich in Zelle D2 folgende String darstellen:
zähle von links vier Strings nach rechts "ABC "
mache aus "314 " nun eine vierstellige Zahl "0314 "
entferne die zwei Leerzeichen nach der Zahl "0314 ", so da...
16.09.2008 10:46:00
Thread-ID: 1009991
8 Beiträge
Anzeige
Zeichenkette in einer Zellesuchen
Gordon

Moin,
ich habe in einer Zelle (A1) einen Namen plus ein Datum dazu stehen: "Max Mustermann (01.01.1900)"
Nun möchte ich überprüfen, ob diese Zeichenkette, also Name plus Datum, nochmals in der Zelle A2 steht.
In der Zelle A2 stehen mehrere dieser Zeichenketten. Diese sind in einer...
26.09.2008 12:54:00
Thread-ID: 1012601
4 Beiträge
Anzeige
Teile eines Strings auslesen
Joachim

Hi,
wie kann ich denn einen Teil eines Strings auf dem Sheet "data" in der Zelle B10 auslesen. und zwar folgender massen:
Die Einträge könnten so aussehen:
GBm123456
ATU12478
GM123587
Dabei interessieren mich aber nur die Buchstaben, ABER der wahrscheinlich Hauptproblem:...
05.12.2008 09:10:18
Thread-ID: 1030353
6 Beiträge
Leerzeichen links aus TextBox entfernen
Lenni

Moin Excellianer!
Wie kann man in einer TextBox (in einem UserForm) Leerzeichen links des ersten Wortes so rausfiltern, dass der TB-Eintrag wirklich mit einem Zeichen beginnt? ...und keinem Leerzeichen.
Vielen Dank für Eure Hilfe!
Viele Grüße aus dem hohen Norden!
Lenni
19.02.2009 21:58:00
Thread-ID: 1052293
5 Beiträge
Anzeige
Nur 50 Zeichen eines Strings auslesen
Kai

Hi,
ich habe in A1 einen String stehen, den möchte ich auslesen und weiter verwerten. Wenn der String aber über 50 Zeiche hat, sollen nur die ersten 50 Zeichen ausgelesen werden, der Rest kann ignoriert werden.
String = Sheets("Daten").Range("A1")
Wie lesen ich diese aus ?
Dank...
20.05.2009 08:15:40
Thread-ID: 1076201
15 Beiträge
Automatisches Auslesen von Teilnehmerlisten
Teilnehmerlisten

Hallo,
nachdem mir hier so nett, schnell und kompetent geholfen wurde, traue ich mich mit meiner nächsten Frage an den Start und hoffe das es für mein Problem auch eine Lösung gibt.
Ich bekomme Teilnehmerlisten in denen Teilnehmer und Kurse bunt gemixt sind wie in der Beispiel-Datei zu...
26.08.2009 17:19:14
Thread-ID: 1098835
4 Beiträge
Anzeige
Zeichenfolge in einem String färben
Mandy

Hi,
ich habe eine Spalte mit viele Zellen und Text. Nun möchte ich innerhalb der Spalte alle Zellen durchlaufen und alle Zeichenfolgen "###" rot färben.
Wie kann ich denn das mit einem Makro machen.
Danke
Mandy
15.09.2009 09:59:36
Thread-ID: 1102845
13 Beiträge
Leerzeichen innerhalb eines Strings finden
pitmu1@web.de

Hallo zusammen,
wer kann mir sagen, wie man das 2. Leerzeichen von rechts innerhalb eines Strings finden kann.
Möglicherweise ohne VBA.
Danke im voraus
17.09.2009 09:40:42
Thread-ID: 1103455
3 Beiträge
Userform soll Teil eines Strings in Spalte suchen
Jaffi

Hallo liebe Mitstreiter,
nun habe ich mal wieder ein Problem welches ich nicht alleine lösen kann :(
Ich möchte mithilfe einer UserFom und einer For-Schleife 3 Buchstaben bzw, Zahlen oder beides in einer Spalte suchen. Ich gebe also 3 Zeichen in die Textbox ein und die Prozedur soll nun...
11.11.2009 08:39:13
Thread-ID: 1116052
14 Beiträge
Wie lösche ich ein Zeichen in einem String?
hans-Jörg

Hallo,
strTest = "A "
wie kann ich das leerzeichen löschen?
Oder besser:
If Mid(TBTeilStr,2,1) = " " Then ??????Wie geht es wenn ich die letzten 2 Zeichen löschen möchte?
Hans-Jörg
11.04.2002 14:55:49
Thread-ID: 112482
4 Beiträge
Suchen von Zeichen in Formeln
sam
Hi Frank,du hast es erraten. "Bearbeiten" - "Ersetzen" (oder [STRG]+Hund wenn du es im VB brauchst, schlage ich vor, du läßt dir die Befehle aufzeichnen.
Gruß,
Sam
15.04.2002 11:25:20
Thread-ID: 113337
4 Beiträge

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige