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

ComboBox- u. TextBox-Inhalt in Zelle zusammen

Forumthread: ComboBox- u. TextBox-Inhalt in Zelle zusammen

ComboBox- u. TextBox-Inhalt in Zelle zusammen
04.05.2007 10:55:07
Lenhard
Moin Moin!
Selbstverständlich habe ich hier schon im Forum gesucht und leider keine passende Antwort gefunden.
Besteht eigentlich die Möglichkeit, den Inhalt einer ComboBox und einer TextBox (beide in einem UserForm) in eine Zelle meines Arbeitsblattes zusammen zu führen?
Und dann am besten durch ein Zeichen getrennt? Z.B. "/" oder "-" oder "," usw. usw.
Das Ergebnis sollte dann so in einer Zelle aussehen:
„ComboBox-Inhalt“ / „TextBox-Inhalt“
Viele Grüße aus dem hohen Norden
Lenhard

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ComboBox- u. TextBox-Inhalt in Zelle zusammen
04.05.2007 10:58:05
Jürgen
Hallo Lenhard,
versuch es mal damit:
cells (reihe,spalte)=combobox.value & "/" & textbox.text
Gruß
Jürgen

AW: ComboBox- u. TextBox-Inhalt in Zelle zusammen
04.05.2007 10:59:00
chris
hallo lenhard,
das ist kein problem.
Das geht so.

Private Sub CommandButton1_Click()
Cells(1, 1) = ComboBox1.Value & "\" & TextBox1.Value
End Sub


Hoffe ich konnte helfen.
gruß Chris

Anzeige
AW: ComboBox- u. TextBox-Inhalt in Zelle zusammen
04.05.2007 11:57:00
Lenhard
ES KLAPPT!!! vielen Dank Euch Beiden!!
Aber wie das so ist, daraus ergibt sich gleich die nächste Frage:
Wenn die TextBox leer ist, dann soll nur der Inhalt der ComboBox erscheinen. Nun sieht es so aus:
"ComboBox-Inhalt" /
Ich meine, das ist nur ein kleiner "Schönheitsfehler" und ich könnte damit leben. Sollte es nicht allzu viel Mühe machen, hier noch eine Lösung anzubieten, dann wäre ich dankbar. Muss aber nicht unbedingt. Danke!
Gruß
Lenhard

Anzeige
AW: ComboBox- u. TextBox-Inhalt in Zelle zusammen
04.05.2007 12:02:17
Jürgen
Hallo Lenhard
dann müsste es so gehen:
if Textbox.Text="" Then
cells (reihe,spalte)=combobox.value
else
cells (reihe,spalte)=combobox.value & "/" & textbox.text
end if
Gruß
Jürgen

AW: ComboBox- u. TextBox-Inhalt in Zelle zusammen
04.05.2007 12:23:00
Lenhard
Danke Jürgen!
Ich melde mich voraussichtlich heute Abend wieder. Muss nun erst mal zum Spätdienst :-(
Ich muss Deinen Vorschlag auch in mein Gesamtkonzept "hineindenken"... ...ich habe natürlich mehrere Verschachtellungen mit Pflicht- und Soll-Eingaben usw. usw..
Weiter muss ich mein immer noch bescheidenes VBA-Wissen da mit einbringen. Ich will aber mehr lernen!
Gruß
Lenhard

Anzeige
AW: ComboBox- u. TextBox-Inhalt in Zelle zusammen
04.05.2007 13:22:10
Lenhard
Hallo Jürgen!
Nun habe ich doch noch ein wenig Zeit gefunden, bevor ich zur Arbeit fahre. Mir ist nämlich das Problem inzwischen ein wenig klarer geworden.
Ich brauche nicht die Cell-Zuordnung in Deinem Skript.
Diese wird nämlich an "höherer Stelle" im UF-Skript realisiert.
Application.ScreenUpdating = False
With Sheets("Röntgendokumentation")
.Unprotect
lz = .Range("B:P").Find("*", searchorder:=xlByRows, searchdirection:=xlPrevious).Row + 1 'Prüft ob eine Zeile kpl. frei ist
.Cells(lz, 2) = WorksheetFunction.Max(Range(.Cells(5, 1), .Cells(lz, 2))) + 1 'Realisiert die fortlaufende Nummerierung in Spalte B
' ###Hier sind natürlich andere Zuordnungen
.Cells(lz, 8) = ComboBoxUntersuchung & TextBoxUntersuchung 'so will ich die Werte übergeben
.Cells(lz, 8) = ComboBoxUntersuchung & " / " & TextBoxUntersuchung 'dieses ist im Prinzip Dein und Chris sein Vorschlag
' ###Hier sind weitere andere Zuordnungen
.Protect
End With
Unload Me
Set wsRD = Nothing
Application.ScreenUpdating = True
Weiter unten im UF-Skript habe ich dann folgendes stehen:

Private Sub UserForm_Activate()
With TextBoxDatum
.Text = Format(Date, "dd.mm.yyyy")
.SetFocus
.SelStart = 0
.SelLength = Len(.Text)
End With
With TextBoxUntersuchung	'##UM DIESE TEXTBOX HANDELT ES SICH##
'	Hier müßte ein Skript rein in etwa so: Wenn in TB-Untersuchung ein Text geschrieben wird,  _
dann soll diese TB " / " & den gerade geschrieben Inhalt ausgeben
End With
End Sub


Ist das so verständlich? Ich habe es natürlich versucht mit meinem bescheidenen VBA-Wissen zu lösen... ...stoße aber immer noch an Grenzen.
Gruß
Lenhard

Anzeige
;

Forumthreads zu verwandten Themen

Word-Text auf xls-Zellen verteilen
Florian

Guten Morgen zusammen,
eine Frage: wie kann ich Word-Zeilen auf Excel-Zeilen (einzelne Zellen verteilen)?
Im Word-File habe ich z.B. den Text
Zeile1
Zeile2
Zeile3
untereinanderstehen, jetzt soll "Zeile1" in Zelle A1, "Zeile2" in Zelle B1 usw. stehen. Bsp hängt an.
Da...
18.08.2008 07:29:00
Thread-ID: 1002498
3 Beiträge
Zellinhalt aufgrund Sheetname und Zelle ermitteln
Peter

Guten Tag
Wahrscheinlich stehe ich mir selbst auf der Leitung.
Mit Hilfe der String-Variablen strTab (enhaltend der Worksheet-Name) und strZelle (enthaltend die Zelladresse, z.B. A3) möchte ich den Wert der entsprechenden Zelle (Text) ermitteln und der Variable strContent zuweisen.
...
11.09.2008 10:31:00
Thread-ID: 1009001
3 Beiträge
Anzeige
Textbox auf UF dann Zellen füllen
Walter

Hall Fachfrauen und Männer,
habe ein kleines Problem bzw. Frage:
Ich habe auf einer UF eine Textbox1 wenn ich einen Wert eingebe z.b. 15,00
dann wird der Wert in meine Tabelle C10 eingesetzt.
Nun möchte ich das der Wert von C10 die Zellen mit dem gleichen Wert bis
C20 ausfül...
30.09.2008 10:27:04
Thread-ID: 1013282
11 Beiträge
Zelle auf Inhalt Text oder Zahl prüfen
Moritz

Hallo,
ich habe eine sehr große Tabelle mit Adressen. Problem ist nur, dass die Straßen, PLZ und so nicht untereinander in einer Spalte stehen sondern alle unterschiedlich verrückt sind je nachdem wie viele Vorname oder Nachnamen jemand hat. Es gibt aber ein einheitliches System. Erst kommt...
30.09.2008 10:36:00
Thread-ID: 1013287
3 Beiträge
Zelleninhalt auf Textteil überprüfen...
Jessi

Hallo zusammen,
ich bin gerade dabei meine Liste mit SVerweisen zu füllen und hänge an einem Problem:
Eine Ausgabe (über SVerweis) liefert einen Wert "String" XY_Text, ALTERN_Text oder MUSTER_Text in einer Zelle
jetzt möchte ich in einer anderen Zelle sagen:
Wenn Zelleninhalt mi...
07.11.2008 12:55:13
Thread-ID: 1022638
2 Beiträge
Formelproblem "wenn(text - beinhaltet, dann....)
Andi

Hallo Experten,
Ich steh bei folgender Excelformel an.
=WENN(D13=....folgender text beinhaltet ist (AA).....;"True";"false")
Ich würde gerne überprüfen ob im Feld D13 der Text "AA" vorkommt (z.B. Artikel "AA01"), falls dies zutrifft bitte "True" schreiben, ansonsten "false".
Da...
04.12.2008 11:42:00
Thread-ID: 1030117
3 Beiträge
Wenn dann mit VBA und Makro starten
Thomas

Hallo guten Morgen liebe Helfer,
ich komme mit einer Wenn Dann Formel im VBA nicht klar. Wer kann mir bitte helfen.
WENN Zelle C1 = OK DANN starte Makro1 sonst MsgBox "Eingabe leider falsch"
Ich schaffe es einfach nicht das ich innerhalb der Abfrage ein Makro starten lasse möchte we...
31.01.2009 09:18:37
Thread-ID: 1045583
4 Beiträge
Anzeige
Wenn/Dann mit vielen Bed. & je Bed. zwei Lösungen
Joerschi

Hallo Excel-Fans,
ich hänge grad ein einem Wenn/Dann-Problem.
Es sollen mehrere Bedingungen geprüft werden (also wahrscheinlich Einbindung der UND-Funktion) und wenn diese alle erfüllt sind, dann gibts ein Ergebnis A. Wenn nicht erfüllt, dann Ergebnis B.
Soweit klingts einfach - der...
12.02.2009 12:28:00
Thread-ID: 1050000
5 Beiträge
Wenn-Dann-Abfrage mit mehr als 8 Argumenten
Uwe

Hallo an alle Nutzer dieses Forums,
ich habe folgendes Problem mit einer Wenn-Dann-Abfrage.
Wir haben 15 experimentell ermittelte Zahlenwerte die mit folgenden Werten verbunden sind ( 2,4,6,8,10... bis 30 ).
Wenn Wert 2,dann Wert A,wenn Wert 4, dann Wert B usw. bis Wert 30,dann Wer...
20.04.2009 16:42:20
Thread-ID: 1069883
8 Beiträge
Anzeige
Wenn feste Zeichenfolge in Textbox, dann...
Lenni

Moin Excellianer!
Im Archiv finde ich leider nichts Vergleichbares und mit der InStr-Funktion setze ich mich auch schon bezüglich meiner Fragestellung auseinander. Komme aber leider zu keinen Ergebnissen.
In einem UserForm1 steht in der Textbox1 ein beliebiger Text von beliebiger Länge....
27.04.2009 22:31:44
Thread-ID: 1071497
3 Beiträge
Zelle auf zwei Bedingen prüfen
Claudia

Guten Tag,
ich habe folgendes Problem:
ich möchte mit einer Schleife den Inhalt von Zellen auf zwei Bedingungen prüfen.
Hier der Code:
Do While Sheets(b).Cells(iDatumRow, i) "Ich" Or "Du"
leider funktioniert er nicht, es klappt nur mit einer Bedingung, also ohne Or "Du"
...
16.06.2009 12:54:36
Thread-ID: 1081854
13 Beiträge
teste verschiedene Zellen auf den selben Inhalt
Tom

Hallo,
Ich habe verschiedene Zellen mit einem Datum versehen, welches sich täglich ändern kann.
Und..ich habe ein "Master-Datum" in einer Zelle stehen..
Ich möchte gern ein "Wahr" oder ein "Falsch" oder halt vergleichbares als Antwort
wenn:
Teste bestimmte Zellen auf deren D...
23.06.2009 12:19:20
Thread-ID: 1083751
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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