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

Werte von 3 Comboboxen in 1 Zelle schreiben

Forumthread: Werte von 3 Comboboxen in 1 Zelle schreiben

Werte von 3 Comboboxen in 1 Zelle schreiben
09.12.2025 20:44:52
Roger
Guten Abend miteinander

Ich habe folgendes Problem: In 3 Comboboxen (in einer Userform untergebracht) können aus Listen (Dropdown) Werte ausgewählt werden. Nun müssten diese 3 Werte nacheinander mit einem Leerschlag dazwischen in eine einzelne Zelle geschrieben werden. Ist das möglich?

Danke für die Hilfe,
Roger
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte von 3 Comboboxen in 1 Zelle schreiben
09.12.2025 21:37:30
Alwin Weisangler
Hallo Roger,

für Zelle A1 beispielhaft so ins Modul Userform: 


Option Explicit



Private Sub CommandButton1_Click()

    Tabelle1.Cells(1, 1) = ComboBox1 & vbNewLine & vbNewLine & ComboBox2 & vbNewLine & vbNewLine & ComboBox3

End Sub



Private Sub UserForm_Initialize()

    Dim i&

    For i = 1 To 3

        Controls("ComboBox" & i).List = Array("Cbx" & i & " Wert 1", "Cbx" & i & " Wert 2", "Cbx" & i & " Wert 3", "Cbx" & i & " Wert 4")

    Next i

End Sub

https://www.herber.de/bbs/user/179804.xlsm

Gruß Uwe
Anzeige
AW: Werte von 3 Comboboxen in 1 Zelle schreiben
09.12.2025 22:51:37
Roger
Danke für diese Lösung. Das funktioniert. Nun ist es so, dass ich die Werte nebeneinander in der Zelle brauche und nicht unterhalb. Wie kann ich das lösen?

Danke,
Roger
AW: Werte von 3 Comboboxen in 1 Zelle schreiben
10.12.2025 00:01:30
snb 
Cells(1)) = join(array(ComboBox1, ComboBox2, ComboBox3))
AW: Werte von 3 Comboboxen in 1 Zelle schreiben
10.12.2025 00:17:22
Roger
Danke, funktioniert.
Anzeige
AW: Werte von 3 Comboboxen in 1 Zelle schreiben
09.12.2025 22:40:11
Daniel
Hi

Das geht auch ohne Makro:

1. Verknüpfe jede Combobox mit einer freien Zelle, in dem du die Zelladresse in die Eigenschaft ControlSource einträgst, bei mehreren Blättern in der Datei mit Tabellenblatt: 'Tabelle1'!A1

2. In der eigentlichen Zielzelle verküpfst du dann diese drei Zellen per Formel mit & oder mit der Funktion TEXT VERKETTEN(" ";WAHR;A1;B1;C1)

Zelladressen natürlich anpassen.

Gruß Daniel
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum