Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1096to1100
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1096to1100
1096to1100
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Combobox mit Werten füllen

Combobox mit Werten füllen
Jeron
Hallo liebe Excel Freunde,
ich sitz gerade an einem Userform, dass Werte aus einer Tabelle über eine Combobox auslesen soll.
Ich möchte erreichen, dass die Spalte C, Zelle C8 - C56 auf Inhalt überprüft wird.
Wenn ein Wert vorhanden ist, soll die ComboBox aber nicht mit dem Wert aus Spalte C gefüllt werden, sondern den Wert in der gleichen Zeile aus Spalte A aufnehmen.
Es müssten also folgenden Teischritte erfolgen:
1: Prüfe Zeile für Zeile in Spalte C8:C56 auf Inhalt
2: Wenn ist Inhalt dann, markiere Zelle und gehe in der gleichen Zeile in die Spalte A
3. Nehme Wert aus Spalte A und fülle die Combobox 1 damit.
Wer kann mir hier bitte weiterhelfen?
Für jede Hilfe und Tipp bin ich sehr dankbar.
Viele Grüße aus München,
Jeron

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Combobox mit Werten füllen
29.08.2009 18:34:01
Hajo_Zi
Hallo Jeron, 
Option Explicit
Private Sub UserForm_Activate()
Dim LoI As Long
For LoI = 8 To 56
If Cells(LoI, 3)  "" Then ComboBox1.AddItem Cells(LoI, 1)
Next LoI
End Sub


AW: Combobox mit Werten füllen
29.08.2009 18:54:05
Jeron
Hallo Hajo_Zi,
vielen Dank für deine schnelle Antwort. Leider zeigt mir die Combobox die Werte noch nicht an
Ich habe jetzt folgenden Programmcode:
Option Explicit
Private Sub ComboBox1_Change()
End Sub


Private Sub UserForm_Activate()
Dim LoI As Long
For LoI = 8 To 56
If Cells(LoI, 3)  "Promotionbelgung" Then ComboBox1.AddItem Cells(LoI, 1)
Next LoI
End Sub
"Promotionbelegung" ist Tabelle 3 bei mir. Hast du vielleicht bitte noch mal einen Tip für mich?
Danke und viele liebe Grüße,
Jeron
Anzeige
AW: Combobox mit Werten füllen
29.08.2009 18:56:25
Hajo_Zi
Hallo Jeron,
ich bin davon ausgegangen das die Tabelle mit Daten aktiv ist. Ansonsten musst Du With ergänzen.
Gruß Hajo
AW: Combobox mit Werten füllen
29.08.2009 19:08:06
Jeron
Hallo Hajo,
sorry ich stelle mich gerade etwas an:
Hier mein Code
Option Explicit
Private Sub ComboBox1_Change()
End Sub


Private Sub UserForm_Activate()
With ComboBox1
Dim LoI As Long
For LoI = 8 To 56
If Cells(LoI, 3)  "Promotionbelegung" Then ComboBox1.AddItem Cells(LoI, 1)
Next LoI
End With
End Sub
Jetzt habe ich mit with ergänzt und die Combobox zeigt die Werte aber nicht an.
Magst du mir bitte noch mal helfen.
Vielen Dank für deine Geduld.
Viele Grüße,
Jeron
Anzeige
AW: Combobox mit Werten füllen
29.08.2009 19:09:52
Hajo_Zi
Halo Jeron,
With auf die Tabelle. 
Option Explicit
Private Sub UserForm_Activate()
Dim LoI As Long
With Worksheets("Tabelle3")
For LoI = 8 To 56
If .Cells(LoI, 3)  "" Then ComboBox1.AddItem .Cells(LoI, 1)
Next LoI
End With
End Sub

Gruß Hajo
AW: Combobox mit Werten füllen
29.08.2009 19:18:21
Jeron
Hi Hajo,
so habe ich es jetzt auch gemacht, aber leider funktioniert es noch nicht.
Option Explicit
Private Sub UserForm_Activate()
With Worksheets("Promotionbelegung")
Dim LoI As Long
For LoI = 8 To 56
If Cells(LoI, 3)  "" Then ComboBox1.AddItem Cells(LoI, 1)
Next LoI
End With
End Sub

Kannst du dir das erklären?
Über eine Antwort würde ich mich sehr freuen.
Beste Grüße,
Jeron
Anzeige
Punkt vor Cells owT.
29.08.2009 19:24:04
hary
.
AW: Combobox mit Werten füllen
29.08.2009 19:25:11
Hajo_Zi
Hallo Jeron,
das liegt Daran das Du nicht den Original Code genommen hast. ein . ist klein in VBA aber wichtig.
Gruß Hajo
AW: Combobox mit Werten füllen
29.08.2009 19:38:13
Jeron
Super :-) Jetzt ist alles gut,
sorry, dass ich nicht selbst draufgekommen bin.
Wünsche ein schönes Wochenende.
Viele Grüße,
Jeron

112 Forumthreads zu ähnlichen Themen

Array mit mehrspaltiger Listbox füllen
Martin

Hallo liebe Excelianer,
eine Listbox kann sehr einfach mit einem Array gefüllt werden: ListBox1.List() = Arr
Leider geht das nicht umgekehrt: Arr = ListBox1.List()
Folgende Lösung habe ich mir geschrieben:
Sub Lösung For i = 1 To ListBox1.ListCount For j = 1 To 9 Arr(i, j) = Lis...
21.08.2009 20:33:45
Thread-ID: 1097859
18 Beiträge
Anzeige
Kombobox mit Werten füllen ohen Duplikate VBA
chrissey

Hallo Leut,
hab im Tabellenblatt "Daten" in Spalte K verschieden Referenznummern, die aber
öffter vorkommen können.
Nun würde ich gerne in einem anderen Tabellenblatt eine Kombobox mit diesen
Nummern aus Spalte K füllen, aber jeder Wert darf nur einmal in der Auswahl
vorkom...
17.03.2010 11:25:26
Thread-ID: 1146565
4 Beiträge
ComboBox mit den Werten aus 4 TextBoxen befüllen
Frank

Hallo am heiligen Sonntag!!!
Ich brauche wieder einmal eure Hilfe.
Auf einer UF befinden sich 4 TextBoxen welche mittels Code befüllt werden. Nun möchte ich gern, dass diese 4 Werte dann in eine ComboBox geschrieben werden! Ist das möglich und wenn ja - wie?
Danke und schönen Sonnta...
08.08.2010 12:43:44
Thread-ID: 1171147
3 Beiträge
Anzeige
bestimmte Spalten mit Werten füllen
strodti

Hallo liebe Excelianer,
ich habe in einer Datei zwei Blätter "Eingabe" und "Zuordnungstabelle" mit identischen Spaltenüberschriften. In "Eingabe" werden Adressdaten u.ä. eingetragen. Über untenstehenden Code werden alle Zeilen, die in Spalte A ein "a" haben, in die "Zuordnungstabelle" kopie...
16.11.2010 18:50:54
Thread-ID: 1187050
4 Beiträge
Zeile einfügen und mit Werten befüllen
Maris

Hallo Leute,
ich habe ein ziemlich difizilles Problemchen... was mir aber den letzten nervt raub und sehr Zeitaufwendig ist. Deswegen wäre ich euch super dankbar wenn ihr mir helfen könntet. Ich habe eine Exceltabelle und ich muß manuell immer eine Zeile einfügen in einer Tabelle und das 5...
23.03.2011 12:20:58
Thread-ID: 1207071
6 Beiträge
Array mit Werten aus Spalten aus füllen
Stefan

Hallo - schon wieder ein Problem.Ich möchte ein Array füllen mit verschiedenen Ausprägungen, die in einer Spalte untereinander stehen. Die Spalte ist aber (1) nicht immer gleich lang und (2) hat doppelte Einträge - jeder Eintrag soll aber nur einmal im Array auftauchen. Hat jemand eine Idee, wi...
13.05.2002 18:02:14
Thread-ID: 120580
2 Beiträge
ComboBox mit Werten füllen funktioniert nicht
Peter

Hallo zusammen,
habe ein Problem und weiß nicht, woran es liegt....
In einem Formular ("Master") habe ich eine ComboBox ("ComboBox2"), die ich mit Daten aus Zeile 1 aus einem Sheet ("WA") füllen möchte. Ich führe den Code aus, die ComboBox bleibt aber leer, obwohl im Sheet Daten stehen...
26.08.2011 13:45:34
Thread-ID: 1227668
9 Beiträge
Array mit Texten befüllen und dann sortieren?
Kasimir

Hallo an Alle!
Ich benötige Eure Hilfe, da ich mich mit Arrays (noch) nicht auskenne. Erst mal ein Beispiel, wie die Daten in einer Tabelle stehen:
Bestand

 A1Artikel2Büchsenmilch3Filtertüten4Kaffee5Aufbackbaguettbrötchen6Aufbackbaguettes7Aufbackbrötchen dunkel8Aufbackbrötc...
16.09.2011 09:33:42
Thread-ID: 1230116
3 Beiträge
Anzeige

Links zu Excel-Dialogen

ComboBox UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
17
4
3
2
1
3
5
1
8
2
2
4
6
4
1
13
2
6
8
8
8
2
7
6
1