Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 09:22:48
VBA Filter in intelligenter Tabelle funktioniert nicht
18.04.2024 08:54:52
automatisches übertragen von Daten
18.04.2024 08:16:13
Dynamische Positionsnummerierung
18.04.2024 08:15:33
Seitwärts scrollen - Fenster fixiert
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
644to648
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
644to648
644to648
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Gleiche Werte in ComboBox nur einmal anzeigen

Gleiche Werte in ComboBox nur einmal anzeigen
03.08.2005 15:42:33
Tinu
Liebe Excel Spezialisten
In einer User Form habe ich eine ComboBox, welche die Werte aus einem bestimmten Tabellenbereich (A1:A999) übernimmt. Nun stehen aber in diesem Bereich die selben Daten (es handelt sich um Namen) mindestens 10 mal. Wie kann ich erreichen, dass in der Auswahl der ComboBox jeder Name nur einmal erscheint?
Für Euere Hilfe wäre ich sehr dankbar!
Grüsse aus der Schweiz
Tinu

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

Betreff
Datum
Anwender
Anzeige
AW: Gleiche Werte in ComboBox nur einmal anzeigen
03.08.2005 15:44:55
Leo
Hi,
kommt ganz darauf an, wie die Box gefüllt wird.
mfg Leo
AW: Gleiche Werte in ComboBox nur einmal anzeigen
03.08.2005 15:51:47
Eule
Hi Tinu
hier mal ein Beispiel:

Private Sub UserForm_Initialize()
Dim x As Variant
With WS
For x = 4 To WS.[a65536].End(xlUp).Row
If WorksheetFunction.CountIf(WS.Range("b4:b" & x), WS.Cells(x, 2)) = 1 Then
cbo1_Kunde.AddItem WS.Cells(x, 2)
End If
Next
End With
End Sub

WS(Workbook/Sheet) muusst Du natürlich anpassen, ebenso cbo1_Kunden
Gruss Eule
AW: Gleiche Werte in ComboBox nur einmal anzeigen
03.08.2005 15:57:41
Tinu
Hi Leo
die Combobox wird nicht über VBA gefüllt. In den Eigenschaften der CB ist einfach A1:A999 als RowSource definiert.
Gruss
Tinu
Anzeige
AW: Gleiche Werte in ComboBox nur einmal anzeigen
03.08.2005 16:00:19
Eule
Hi Tinu
und warum füllst Du die Combo dann nicht über VBA, siehe mein Beispiel?!
Gruss Eule
AW: Gleiche Werte in ComboBox nur einmal anzeigen
03.08.2005 17:21:33
Tinu
Hallo Eule
Die Antwort ist einfach: bei mir steht "VBA nein" ;( ... leider
Ich hab trotzdem mal versucht, Deinen Code anzupassen und einzugeben. Scheinbar mach ich aber etwas grundlegend falsch.
Würdest du bitte den Upload mal anschauen. Ich hab die Datenmenge reduziert.
https://www.herber.de/bbs/user/25288.xls
besten Dank
Tinu
AW: Gleiche Werte in ComboBox nur einmal anzeigen
03.08.2005 19:28:46
Matthias
Hallo Tinu,
das war ja schonmal ein Riesenbock in der Datei, der ist mir erst aufgefallen, als ich den Code überarbeitet habe. Die Prozedur hieß Userform1_Initialize() sie muss aber heißen Userform_Initialize() !!
der geänderte Code:

Private Sub UserForm_Initialize()
Dim x As Long
Dim lz As Long
With ThisWorkbook.Sheets("Sheet1")
lz = .Range("A65536").End(xlUp).Row
MsgBox lz
For x = 3 To lz
If WorksheetFunction.CountIf(.Range("A2:A" & x), .Cells(x, 1)) = 1 Then
ComboBox1.AddItem .Cells(x, 1)
End If
If WorksheetFunction.CountIf(.Range("B2:B" & x), .Cells(x, 2)) = 1 Then
ComboBox2.AddItem .Cells(x, 2)
End If
Next
End With
End Sub

Ich ging davon aus, dass in Spalte A nicht weniger Zeilen gefüllt sind als in Spalte B, so habe ich die letzte Benutzte Zeile über Spalte A ermittelt (lz = .Range("A65536").End(xlUp).Row).
Gruß Matthias
Anzeige
AW: Gleiche Werte in ComboBox - Nachtrag
03.08.2005 19:31:25
Matthias
Hallo Tinu,
ach ja, und die Eigenschaft "RowSource" der Comboboxen musst du löschen!
Sie wird ja über VBA befüllt!
Gruß Matthias
AW: Gleiche Werte in ComboBox - Nachtrag
03.08.2005 23:13:06
Tinu
Besten Dank an alle, die für mich die Hirnzellen angeworfen haben. Der Code von Matthias funzt bestens. Auch die Version mit dem Spezialfilter erfüllt die Aufgabe, aber eben schon nicht so elegant.
Ich denke, ich muss noch viel VBA üben ;)
Grüsse aus der Schweiz
Tinu
AW: Gleiche Werte in ComboBox nur einmal anzeigen
03.08.2005 16:01:42
Leo
Hi,
dann geht halt nicht. Du musst die Tabelle zuvor entsprechend aufbereiten.
Z.B. mit Spezialfilter ohne Duplikate.
mfg Leo

328 Forumthreads zu ähnlichen Themen

Variable Gültigkeitsliste ohne doppelte Werte
Susi

Hallo liebe Excel-Freunde,
ich möchte gerne aus einer Datentabelle den Inhalt einer Spalte für eine Auswertung über eine Variable Gültigkeitsliste ziehen.
Zur Verdeutlichung hier ein einfaches Spiel-Beispiel:
Spalte A Spalte B
Äpfel 10
Äpfel 20
Birnen...
28.11.2008 10:08:27
Thread-ID: 1028603
5 Beiträge
Anzeige
Zahlen ohne doppelte Ziffern
oliver

ich brauche 25'000 fünfstellige zahlen. in keiner zahl darf die selbe ziffer mehr als einmal vorkommen. wie kann ich dies im excel bewerkstelligen?
ein beispiel falls das unlogisch klingt;
richtige zahlen; 012324, 12345, 23456, 34567, 45678, 56789, 67890 usw...
falsche zahlen; 01223...
01.01.1970 00:00:00
Thread-ID: 1067973
46 Beiträge
Zählen ohne Duplikate mit 5 Bedingungen
Jonathan

Hallo liebe Experten,
ich stehe mal wieder vor einer Herausforderung, bei der ich Hilfe benötige.
Ich muss in einer Spalte Materialien ohne Duplikate zählen. Diese Materialien müssen dann 5 Bedingungen in anderen Spalten erfüllen.
Als Ergebnis soll mir dann die Anzahl ausgegben werd...
03.07.2009 12:33:02
Thread-ID: 1086200
17 Beiträge
Anzeige
Krieg Zählenwenn mit 2 Bedingugnen geht nicht
Julia

Hallo,
ich bekomme es einfach nicht hin :(
Ich bin in Mappe1, dort in Zelle A1 will ich folgendes:
Zählenwenn negativer Wert in Spalte P und Spalte Spalte J ist ungleich GESCHLOSSEN (STEHT ALLES IN MAPPE2)
Jemand einen Tipp?
Gruß
Julia
02.10.2009 15:39:41
Thread-ID: 1106874
7 Beiträge
Zählen von Zellen ohne doppelte / mehrfache Werte | Herbers Excel-Forum
Julia
Hey Leute,
ich habe eine vorgefertigte Excel-Datei bekommen und muss in einem neuen Tabellenblatt die Anzahl der Daten zählen.
Die Daten befinden sich auf dem Tabellenblatt "VZ-KVs" im Bereich von "Z10S2:Z1009S2" (ist in einer Spalte).
Bei den Daten handelt es sich um Text mit Zahlen u...
08.02.2010 20:29:07
Thread-ID: 1136852
6 Beiträge
zählenwenn geht nicht
ray

Hallo,
ich möchte zählen, wieviel zellen leer sind:
So geht es nicht:
=ZÄHLENWENN(Q3:Q1295;"=""")
ergebnis ist "0". Es gibt aber in dem Bereich Zellen, wo nix drin steht.
Was mach ich falsch?
Viele Grüße aus dem sonnigen Hamburg bei 17,5 Grad
Ray
01.06.2010 14:56:55
Thread-ID: 1159844
6 Beiträge
Zählenwenn (aus nicht miteinan. verb. Zellen)
Joerschi

Hallo liebe Community,
wahrscheinlich habe ich grad einen kleinen Blackout :-(
Ich möchte aus mehreren Zellen (die nicht direkt miteinander verbunden sind/nebeneinander liegen) mit der Zählenwenn-Formel einen Wert zählen lassen. Irgendwie bekomme ich aber die Formel nicht hin...
Bsp...
07.08.2010 10:18:20
Thread-ID: 1171013
7 Beiträge
Nur eindeutige Werte in Matrix zulassen?
Frank

Hallo,wie kann ich in einer Matrix A1:C10 überprüfen ob jeder dort eingetragene Wert auch wirklich nur einmal vorkommt?
Falls ein Wert zweimal eingetragen wird bzw. vorkommt sollte evtl. eine Meldung erscheinen wie z. B. "wert bereits vorhanden".GrußFrank
08.05.2002 13:35:54
Thread-ID: 119550
5 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
4
1
45
16
1
6
5
5
6
4
3
2
1
3
2
4
6
2
4
3
6
2
1
4
6