Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
824to828
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
824to828
824to828
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Combobox mir werte aus spalte füllen ohne doppelte

Combobox mir werte aus spalte füllen ohne doppelte
29.11.2006 23:19:29
Tobias
Hallo,
ich habe eine excel datei mit Artikeln (CD's) und verschiedene spalten z.B. Band, Album, Veröffentlicht am, Label, musikrichtung, usw.
Nun möchte ich alle verschieden Musikrichtungen auslesen und in eine Combobox reinschreiben, allerding keine doppelten:
Beispiel:
cd1 - punk
cd2 - hiphop
cd3 - rap
cd4 - hiphop
cd5 - rap
cd6 - punk
cd7 - rap
In meiner Combobox stehen nun folgende Werte:
punk
hiphop
rap
danke für eure hilfe
tobi

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Combobox mir werte aus spalte füllen ohne dopp
29.11.2006 23:23:36
ramses
Hallo
Bei deinem Level sollte das einfach zu lösen sein
Mit "AddItem" die Werte zur Kombobox hinzufügen
Vor dem hinzufügen, prüfen ob der Eintrag schon vorhanden in der Liste, wenn JA verwerfe und den den Eintrag aus der nächsten Zelle nehmen
Also 2 ineinander verschachtelte schleifen
Gruss Rainer
AW: Combobox mir werte aus spalte füllen ohne dopp
29.11.2006 23:49:55
Tobias
Habs einfacher gemacht
Lösung:

Private Sub UserForm_Activate()
Dim genre As New Collection
Dim zaehler As Integer
zaehler = 2
On Error Resume Next
Do Until IsEmpty(Cells(zaehler, 1))
genre.Add Cells(zaehler, 12), Cells(zaehler, 12)
If Err = 0 Then
cboMusikrichtung.AddItem Cells(zaehler, 12)
Else
Err.Clear
End If
zaehler = zaehler + 1
Loop
cboMusikrichtung.ListIndex = 0
End Sub

mfg
tobi
Anzeige
AW: Combobox mir werte aus spalte füllen ohne dopp
29.11.2006 23:56:06
ramses
Hallo
"...Habs einfacher gemacht..." Wirklich ?
Wo hast du denn den Code her :-)
Für jemand der vorher keine Ahnung hatte wie man eine Combobox mit Einzelwerten füllt, erscheint mir das Procerdere der "New Collection", mit der Fehlercodegeneration wenn ein doppelter Wert in die collection eingetragen wird, als nicht gerade dem VBA-Allgemeinwissen zuordnungsfähig.
Gruss Rainer

306 Forumthreads zu ähnlichen Themen

Farbige Zellen suchen und Zuordnung auflisten
Excel-Opfer

Hallo zusammen,
ich hab nicht so die Ahnung von Makros und Automationen im Excel, bräuchte allerdings "dringend" eine Vereinfachung meines Excelchaos.
es dreht sich um folgende Problematik:
ich muss diverse Dienstpläne in unsere Personalplanung einarbeiten, leider liefert eine Abtei...
08.08.2008 06:47:00
Thread-ID: 1000143
16 Beiträge
Anzeige
Zellwerte aus markierten Tabellen übertragen
obelix-xxl

Hallo,
in mehreren Tabellen habe ich in der gleichen Spalte X11:X100 Summenwerte eingetragen.
Die Spaltenbeschriftung ist in der Zelle X10 und ist gleich dem Tabellennamen, z.B. -1.234.
Ich benötige nur die Ergebnisse der markierten Tabellenblätter. Diese in den markierten Tabellen...
06.09.2008 17:29:20
Thread-ID: 1007869
3 Beiträge
Spaltenwerte ausgewählter Tabellen kopieren
obelix-xxl

Hallo,
in mehreren Tabellen habe ich in der gleichen Spalte X11:X100 Summenwerte eingetragen.
Die Spaltenbeschriftung ist in der Zelle X10 und ist gleich dem Tabellennamen, z.B. -1.234.
Zur weiteren Verwendung möchte ich nur die Ergebnisse der markierten Tabellenblätter in eine neu...
07.09.2008 08:42:00
Thread-ID: 1007926
2 Beiträge
Anzeige
Liste deaktivieren, wenn Bedingung erfüllt
Timo

Hallo,
ich habe in der Zelle B13 eine Liste (über Gültigkeit--Liste) eingefügt, wo ein Nutzer zwischen den drei Optionen "Alle", "Erste Hälfte" und "zweite Hälfte" wählen kann. In Zelle B14 befindet sich ebenfalls eine ähnliche Liste auch u.a. mit der Option "Alle".
Jetzt würde ich ger...
23.09.2008 16:08:04
Thread-ID: 1011800
2 Beiträge
VBA-Werte aus Spalte in ComboBox
andreas

Hallo zusammen,
habe ein Formular da möchte ich die Daten nach den Werten in Spalte D Filtern. Dazu sollen die Daten ab Zeile 11 alphabetisch geordnet und jeder Eintrag nur einmal angezeigt in die Combobox eingelesen werden. Der ausgesuchte Wert wird dann als Criterium für die Filterfunktio...
25.09.2008 08:47:11
Thread-ID: 1012218
7 Beiträge
Berechnen von Werten in einer Spalte
Werten

Folgendes Problem:
In der Spalte A möchte ich wissen, wieviel unterschiedliche Werte es gibt.
Wer kann mir helfen.
Danke
Alex
05.10.2008 12:52:00
Thread-ID: 1014231
5 Beiträge
Werte aus Tabelle finden
Florian

Hallo und Guten Morgen,
ich habe ein kleines Problem!
Ich habe eine Tabelle (Matrix), die Vergütungsgruppen und deren Unterteilung in Stufen, enthält.
Hier ist die Datei: https://www.herber.de/bbs/user/56583.xls
Wie kann ich für die Mitarbeiter z. B. in den Zellen "D2" bis "D7"...
07.11.2008 08:56:00
Thread-ID: 1022516
2 Beiträge
Liste auswerten mit Bedingungen
Bernd

Hallo zusammen,
ich würde gerne mal wieder eine lange Excel auswerten mit verschiedenen Bedingungen. Die relevanten Datensätze, auf die die Suchbedingung zutreffen, sollten in einem Extra-Registerblatt chronologisch aufgelistet werden. Wie kann ich das Problem vorzugsweise mit Excel-Boardmi...
19.11.2008 10:01:00
Thread-ID: 1025891
6 Beiträge
Anzeige

Links zu Excel-Dialogen

ComboBox Label

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
15
2
2
1
4
1
6
4
1
5
2
4
4
8
5
9
7
7
3
4
2
5
3
2
2