Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1300to1304
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
1300to1304
1300to1304
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wert aus Combobox auslesen

Wert aus Combobox auslesen
12.03.2013 21:34:08
Matthias
Hallo an alle Experten
ich möchte ein Dropdown Menü erstellen, entweder durch Combobox oder Formularsteuerlemet. In den Dropdown Menü steht z.b. Gisela, Herbert, Thomas usw.. Nach auswählen eines Namen, soll in anderen Tabellenblatt der Vorname gesucht werden. In dem Blatt stehen dann verschieden Namen mit verschiedenen Daten.
In einen Beispiel steht in einer Zeile Gisela Becker und in anderen Zeile steht Gisela Schulz. Hinter jedem Namen stehen Wohnort, Strasse, Alter usw.
So jetzt wähle ich im Dropdown Menü Gisela aus und nun soll in die beide Nachnamen in je eine Zeile geschrieben werden, die den Vornamen Gisela besitzen. Dann soll für jeden Namen noch das Alter und Wohnort in der gleiche Zeile aber in anderen Spalten stehen.
Da ich nur leichte VBA Kenntnisse besitze, suche ich hier Hilfe.
Vielen Dank
Matthias

26
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
kleine Korrektur (wg. Spalte Alter)
13.03.2013 09:29:24
Matthias
Hallo Matthias
Hab gerade einen kl. Fehler bemerkt.
Cells(zeile, 7) = RnG.Offset(, 3).Value
ändern in ... 
Cells(zeile, 7) = RnG.Offset(, 4).Value
Gruß Matthias

bei Interesse hab ich noch Version2
13.03.2013 10:30:32
Matthias
Hallo
Da ich gerade am basteln war, hier mal die Version2 dargestellt
Tabelle2

 ABCDE
1VornameNachnameOrtStraßeAlter
2GiselaBeckerOrt 1Hauptstr.136
3RenateSchneiderOrt 2Hauptstr.237
4GiselaSchmidtOrt 3Hauptstr.338
5RenateSchmittOrt 4Hauptstr.439
6HildeMaierOrt 2Hauptstr.138
7RenateBeckerOrt 5Hauptstr.540


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

Je nachdem was Du gerade suchst, gibst Du in der entsprechenden Spalte ein
Hier wird nach Ort 2 gesucht.
Tabelle1

 BCDEFG
2Eingabe: ->  Ort 2  
3      
4 VornameNachnameOrtStraßeAlter
5Ergebnis: ->RenateSchneiderOrt 2Hauptstr.237
6 HildeMaierOrt 2Hauptstr.138
7      


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

oder hier nach dem Nachname
Tabelle1

 BCDEFG
2Eingabe: -> Becker   
3      
4 VornameNachnameOrtStraßeAlter
5Ergebnis: ->GiselaBeckerOrt 1Hauptstr.136
6 RenateBeckerOrt 5Hauptstr.540
7      


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Gruß Matthias

Anzeige
AW: bei Interesse hab ich noch Version2
13.03.2013 13:47:18
Matze
Hallo
danke für die schnelle Antwort. Ich will den Namen aber nicht händisch eingeben, sondern aus einer Auswahl anwählen, z.b. durch ein Dropdown Menü(Combobox...). Ich habe es versucht, aber beim Befüllen der Zelle ändert sich leider nichts.
Natürlich finde ich deine Version2 auch nicht schlecht.
Danke
Matthias

gehts also nur um die Vornamen ?
13.03.2013 13:50:24
Matthias
Hallo
Dann ändere ich das mal fix, natürlich dann auch mit einner Combobox bedienbar.
Gruß Matthias

AW: gehts also nur um die Vornamen ?
13.03.2013 14:09:01
Matze
Hallo
ich werde nicht nur nach Vornamen suchen, auch nach anderen Daten. Meine Idee wäre mit verschiedenen Comboboxen zu arbeiten!
Gruss
Matthias

Anzeige
kann man machen muss man aber nicht ...
13.03.2013 14:15:51
Matthias
Hallo
Eine Combobox reicht da aus.
Die kann man bei Bedarf mit den relevanten Daten "füttern"
Man könnte OptionButton benutzen mit denen man der Combobox den relevanten Namensbereich zuweist.
Das sehe dann so aus:
Userbild
Wäre das so akzeptabel?
Gruß Matthias

AW: kann man machen muss man aber nicht ...
13.03.2013 14:21:51
Matze
Hallo
das ist nicht schlecht!
Matthias

AW:Kopieren!
13.03.2013 14:40:09
Matze
Hallo
ich habe gerade versucht deine Tabelle zu kopieren in anderes Tabellenblatt. Ich habe auch das Script mit kopiert. Leider geht deine Auswertung nicht mehr. Ich kann mir aber nicht erklären warum?
Matthias

Anzeige
Das war mir fast klar das es nicht klappt ...
13.03.2013 15:35:38
Matthias
Hallo
Es wäre ja auch besser gewesen, Du hättest Deine Datei gepostet, so hätte ich auch mit den entsprechenden Zelladressen arbeiten können,
So konnte ich ja nur eine allgemeine Lösung posten.
Hier die Version5 mit nur einer Combobox
https://www.herber.de/bbs/user/84325.xlsm
Gruß Matthias

AW: Das war mir fast klar das es nicht klappt ...
13.03.2013 16:40:18
Matthias
Hallo
danke für die Tabelle. Ich dachte schon, das die Orginaltabelle hilfreich wäre. Ich habe versucht an einen einfachen Beispiel mein Problem zu schildern. Meine eigene Tabelle hat ganz andere Parameter und sehr komplex, welches man schlecht beschreiben kann. Ich werde versuchen, deine Vorschläge in meine Tabelle einzupflegen. Dann kann ich sie Dir im ganzen zeigen.
Ich habe die Tabelle gerade geöffnet und sie macht einen Fehler beim Auswahl der Namen. Dieser Fehler tritt nur beim ersten Mal auf. Ändere ich den Ort, dann geht auch wieder der Vorname.
Bis dann
Matthias

Anzeige
AW: Fehler behoben ...
13.03.2013 17:45:19
Matthias
Hallo
super!!!!!
Kannst du mir deine E-Mail Adresse schicken, dann sende ich dir meine überarbeitete Liste. Ich möchte Sie nicht öffentlich machen. Meine Adresse lautet mhurt@web.de.
Bis dann
Matthias

AW: neue Frage....
14.03.2013 10:08:12
Matze
Hallo
ich habe gestern die Liste für meine Zwecke bearbeitet. Es geht soweit alles. In meiner Tabelle kommt es auch vor, das ein Feld leer bleibt. Bleibt dieses Feld leer, dann liest er beim wechslen der Kategorie auch das leere Feld. Ich weiss wieso, aber keine perfekte Lösung es zu ändern.
Hier deine Datei mit den leeren Feld.

Die Datei https://www.herber.de/bbs/user/84349.xlsm wurde aus Datenschutzgründen gelöscht


Bis dann
Matthias

Anzeige
und wie lautet die Frage ?
14.03.2013 19:17:16
Matthias
Hallo Matthias
Willst Du den Datensatz (wenn ein Eintrag fehlt) nicht anzeigen ?
Gruß Matthias

AW: bei leeren Dropdown-Menü keine Werte auslesen
14.03.2013 19:47:37
Matthias
Hallo
der Datensatz soll angezeigt werden, auch wenn ein Element fehlt. In den Beispiel was ich schickte, fehlt bei Renate Schmitt der Ort. Bei der Auswahl von Renate Schmitt wird alles richtig angezeigt. Jetzt wähle ich bei den Option Button den Ort, das Dropdown Menü wird gelehrt. Jetzt steht in der Auswertung alle Daten, wo der Ort leer ist. Bei leeren des Dropdown Menü sollen alle Zellen auch leer bleiben.
Danke
Matthias

mal zum nachvollziehen ...
14.03.2013 20:52:06
Matthias
Hallo
Das Beispiel zeigt nur Renate Schmitt, also hast Du vorher das Optionsbutton "Nachname" aktiviert.
Wenn Du nun Optionsbutton "Ort" aktivierst, wird die Combobox nich nur geleert sondern mit allen Orten neu befüllt. Jetzte bei Auswahl eines Ortes wird das Listing neu erstellt.
aber evtl. reicht diese Änderung das Problem zu lösen
oder Du meinst, wenn du den Inhalt der Combobox leerst
Dann ersetze mal das ComboBox1_Change so:
Private Sub ComboBox1_Change()
If ComboBox1.ListIndex = -1 Then
Range("C5:G" & Rows.Count).ClearContents
Else
Range("C2:G2").ClearContents
If MyCol > 0 Then Cells(2, MyCol) = ComboBox1
End If
End Sub
Gruß Matthias

Anzeige
AW:einfach Klasse
14.03.2013 21:43:43
Matthias
Hallo
es läuft einfach super.
Einfach Weltklasse
Matthias

Danke für die Rückmeldung kwT
14.03.2013 21:47:08
Matthias

AW: Sortierung
15.03.2013 14:15:05
Matze
Hallo
im Moment versuche ich die Tabelle im weiter zu entwickeln. ich habe die Tabelle so erweitert, das mit dem Nachname noch ein Bild erscheint. Dieses funktioniert schon, leider komme ich jetzt wieder an meine Grenzen. Das Bild soll natürlich verschwinden, wenn ich nun nach einem Ort suchen will.
Dann habe ich mich noch gefragt, ob mann das Dropdown Menü auch aphabetisch sortieren kann. Das geht bestimmt :-).
Wenn du mir Tipps geben könntest, wäre es nicht schlecht.
https://www.herber.de/bbs/user/84389.xlsm
Du sagst einfach, wenn ich dich nicht mehr belästigen soll!!!
Danke
Matthias

Anzeige
Image1.Picture = Nothing
16.03.2013 13:36:42
Matthias
Hallo
grad erst gesehen ...
Setze an den Anfang der Combobox:
Image1.Picture = Nothing
Private Sub ComboBox1_Change()
Image1.Picture = Nothing
Range("C2:G2").ClearContents
If MyCol > 0 Then Cells(2, MyCol) = ComboBox1
End Sub
https://www.herber.de/bbs/user/84402.xlsm
Gruß Matthias

AW: Sortierung
16.03.2013 14:16:09
Matthias
Hallo
alles kein Problem. Werde ich gleich mal testen. Hast du noch eine Idee wegen der Sortierung im Dropdown Menü?
Danke
Matthias

AW: Sortierung
16.03.2013 14:16:11
Matthias
Hallo
alles kein Problem. Werde ich gleich mal testen. Hast du noch eine Idee wegen der Sortierung im Dropdown Menü?
Danke
Matthias

Anzeige
Sortiere doch einfach vorher ...
16.03.2013 16:22:16
Matthias
Hallo
Private Sub OptionButton1_Click()
Tabelle2.Columns("A:E").Sort Key1:=Tabelle2.Range("A2"), Order1:=xlAscending, Header:= _
xlGuess  'NachName
MyCol = 3
Tabelle1.ComboBox1.Text = ""
MeinBereich = OptionButton1.Caption
Auswahl
End Sub


Private Sub OptionButton2_Click()
Tabelle2.Columns("A:E").Sort Key1:=Tabelle2.Range("B2"), Order1:=xlAscending, Header:= _
xlGuess  'NachName
MyCol = 4
Tabelle1.ComboBox1.Text = ""
MeinBereich = OptionButton2.Caption
Auswahl
End Sub





Private Sub OptionButton3_Click()
Tabelle2.Columns("A:E").Sort Key1:=Tabelle2.Range("C2"), Order1:=xlAscending, Header:= _
xlGuess  'NachName
MyCol = 5
Tabelle1.ComboBox1.Text = ""
MeinBereich = OptionButton3.Caption
Auswahl
End Sub
usw ... analog mit den anderen Optionbutton

Anzeige
AW: Sortiere doch einfach vorher ...
16.03.2013 16:52:34
Matze
Hallo
das löschen des Bildes klappt. Die Idee es vorher zu sortieren, ist nicht so gut, da sich dadurch meine ganze Reihenfolge im Datenblatt ändert. Dieses bringt mein Konzept durcheinander. Kann man im Dropmenü sortieren, wenn du nur die Unikate anzeigst?
Danke
Matthias

schau doch auch mal ins Archiv ...
16.03.2013 17:49:41
Matthias
Hallo
Such doch einfach mal nach:
Werte in Combobox sortieren oder Ähnliche Begriffe
Du solltest die Werte in ein Datenfeld einlesen, darin sortieren und dann in die Combobox schreiben.
Gruß Matthias

217 Forumthreads zu ähnlichen Themen

Dropdownliste ausgew. gültige Werte aktualisieren
Flo

Hallo allerseits!
Ich habe ein Problem mit der Aktualisierung von bereits ausgewählten gültigen Werten in einer Dorpdownliste. Die gütligen Werte der Dropdownliste werden per Namensdefinition aus einem anderen Excelblatt gefüllt. Nun kommt es öfter mal vor, dass sich die Gültigen Werte im s...
16.08.2008 16:24:00
Thread-ID: 1002344
2 Beiträge
Anzeige
Werte aus anderem Blatt für ComboBox auslesen
mtremer

Hallo Excel-Freunde,
ich glaub ich werde verrückt.
Meine ComboBox füllt sich nicht mehr. Ich versuche den Code so zu ändern, dass die Quelle für die ComboBox wo anders stehen kann. Im folgenden Code müssen die Werte in der Spalte A der Tabelle1 stehen.
Private Sub Worksheet_Change...
17.09.2008 13:17:34
Thread-ID: 1010349
11 Beiträge
wert aus dropdown in vba übernehmen
reich

hallo,
könnt ihr mir bitte helfen? wie schaff ich es von einer drop down liste den ausgewählten wert in vba zu übernehmen ...
dim varWert as variant
worksheets("formular").activate
'dropdown 1 liste ansteuern und aktuell ausgewählten wert in vba übernehmen
varWert = 'wert au...
23.09.2008 15:34:00
Thread-ID: 1011776
4 Beiträge
Anzeige
Werte aus Datenbank auslesen
Klaus-Dieter

Hallo zusammen,
kann mir jemand bitte bei nachfolgendem Beispiel weiterhelfen. Ich habe verschiedene Datenbank aus der ich über sverweis verschiedene Daten auslese.
In einer weiteren Datenbank habe ich das Problem daß der Wert in Spalte A öfters vorhanden ist. Mit SVerweis komme ich ab...
17.03.2009 08:05:59
Thread-ID: 1060990
7 Beiträge
Werte mit VB aus anderer Mappe auslesen
Jubro

Hallo zusammen,
ich sollte eine Lösung für folgendes Problemchen haben!
In einer "Mappe1/Tabelle1" habe ich einen Button der bei Click in "Mappe1/Tabelle1" in Spalte "B" die erste freie Zeile sucht und den Wert aus der Zelle links daneben in Zelle "H13" einfügt! dies funktionier ohne we...
01.05.2009 19:49:10
Thread-ID: 1072359
5 Beiträge
Wert aus bestimmten Blatt auslesen (Abhängigkeit)?
Stefan

Hallo,
ich komme hier leider überhaupt nicht weiter - in Abhängigkeit eines Textes soll ein Wert aus einem bestimmten Tabellenblatt ausgelesen und übernommen werden.
Also zB:
Blatt: Rechnung
Zelle: A2 = Baum
Zelle: A3 = Wiese
Zelle: A4 = Straße
Blatt: Baum
Zelle:...
05.05.2009 13:42:55
Thread-ID: 1073068
5 Beiträge
Wert aus Fußzeile auslesen
Konni

Hallo Excelfreunde,
ich möchte den Wert aus dem linken Abschnitt der Fußzeile von Tabelle 1 in die Zelle A5 von Tabelle 2 auslesen/eintragen. Leider krieg ich es nicht hin.
Vielen Dank für Eure Hilfe!
Gruß: Konni
03.07.2009 09:56:40
Thread-ID: 1086147
9 Beiträge
Zellwert aus Auswahlliste auslesen
Kay

Hallo,
ich habe auf Tabellenblatt Daten die Spalten:
A, ID, alphanumerisch
B, Bezeichnung, Text
C, WG, Text
D, WG1 Text
E, WG2, Text
F, Z1, Text
G mit der Formel =A&“ “ &B&“ “F. Die Zeilen-Nr. ist hier nicht mitangegeben.
Ich habe für die Spal...
13.08.2009 22:20:40
Thread-ID: 1095787
5 Beiträge
Anzeige

Links zu Excel-Dialogen

ComboBox OptionButton

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