Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 18:41:19
vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile
25.04.2024 18:22:55
Zeilen mit bestimmtem Datum in andere Mappe übertragen
25.04.2024 18:14:45
VBA - Excell - Kopie und "Diebstahl" Schützen
25.04.2024 17:49:39
Bedingte Formatierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
428to432
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
428to432
428to432
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Drop down menu erstellen

Drop down menu erstellen
21.05.2004 16:44:42
Michael
Hallo,
Vielleicht kann mir ja jemand helfen.
Ich habe eine Tabelle, wo ich in einigen Feldern immer die gleichen Einträge machen möchte.Ich möchte mir eine Drop down Liste erstellen, wo ich eine Auswahl an Begriffen habe. ( z.B. wohnzimmer, Küche, Bad etc.)Ich möchte aber auch einen nicht in dieser Liste enthaltenen Begriff eigeben können.
Wie mache ich das?
Vielen Dank im Voraus
Michael
AW: Drop down menu erstellen
Kurt
Sollen die noch nicht vorhandenen Begriffe später in der Auswahl verfügbar sein?
Kurt
AW: Drop down menu erstellen
Michael
Hallo Kurt,
das wäre natürlich toll.
Viele Grüße
Michael
AW: Drop down menu erstellen
Boris
Hi Michael,
wie bereits beschrieben, den Haken bei "Fehlermeldung" entfernen.
Zudem muss die Auswahlliste dynamisch sein.
Diese sei mal in "Tabelle2" in Spalte A beginnend in Zeile 1.
Einfügen-Namen-Festlegen/Definieren - Name: Auswahl
Bezieht sich auf:
=INDIREKT("Tabelle2!A1:A"&ANZAHL2(Tabelle2!$A:$A))
Dein Gültigkeitsfeld ist in Tabelle1 - A1. Dort gibst du unter Gültigkeit-Liste-Quelle ein: =Auswahl
Zudem hinterlegst du im Modul der Tabelle1 folgenden Minicode:
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(0, 0) <> "A1" Then Exit Sub
Dim C As Range, nextRow As Long
With Worksheets("Tabelle2")
Set C = .Range("A:A").Find(Target, lookat:=xlWhole)
If C Is Nothing Then
If MsgBox("Soll der Begriff der Auswahlliste hinzugefügt werden?" _
, vbYesNo, "Ein neuer Begriff!") = vbYes Then
nextRow = IIf(IsEmpty(.Range("A65536")), .Range("A65536").End(xlUp).Row + 1, 65536)
.Range("A" & nextRow) = Target
End If
End If
End With
Set C = Nothing
End Sub

Neue Einträge werden - nach kurzer Rückfrage - der Auswahlliste hinzugefügt.
Grüße Boris
Anzeige
AW: Drop down menu erstellen
K.Rola
Hallo Boris,
na, schön gefeiert gestern?
Warum eigentlich so umständlich mit dem dynamischen Namen, wenn ohnehin
VBA verwendet wird? Einfach [A2].insert shift:=xlDown und den Begriff
dorthin schreiben. Als Service vielleicht noch sortieren?
Gruß K.Rola
Hook - die Meisterin hat gesprochen...
Boris
Hi K.Rola,
...ja - Vatertag war ganz nett. Danke der Nachfrage. Feierst du denn eigentlich auch schon den Muttertag in eigener Sache?
Zu deiner Anregung - ohne dynamischen Namen. Dieser wird nur einmal am Anfang festgelegt (z.B. für Tabelle2!A1:A5):
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(0, 0) <> "A1" Then Exit Sub
Dim C As Range
With Worksheets("Tabelle2")
Set C = .Range("A:A").Find(Target, lookat:=xlWhole)
If C Is Nothing Then
If MsgBox("Soll der Begriff der Auswahlliste hinzugefügt werden?" _
, vbYesNo, "Ein neuer Begriff!") = vbYes Then
.Range("A2").Insert shift:=xlDown
.Range("A2") = Target
.Range("A:A").Sort Key1:=.Range("A1"), Order1:=xlAscending
End If
End If
End With
Set C = Nothing
End Sub

Grüße Boris
Anzeige
AW: Hook - die Meisterin hat gesprochen...
K.Rola
Hallo Boris,
ich feiere fast jeden Tag, also sind keine weiteren Anlässe erforderlich.
Deine Lösung ist genial, für mich bist du, ich wiederhole mich da gern,
ein Held.
Gruß K.Rola
AW: Hook - die Meisterin hat gesprochen...
Boris
Hi Meisterin der Codezeilen,
...merci!
Grüße Boris
AW: Hook - die Meisterin hat gesprochen...
Michael
Hallo zusammen,
Vielen Dank für die vielen und schnellen Antworten.
Leider kenne ich mich mit VBA nicht aus. Gibts da auch eine einfachere Lösung? ich wüßte nämlich nicht wo ich euren " Code" eingeben sollte.
Vielen Dank
Michael
Eine kleine Beispieldatei...
Boris
Hi Michael,
...wird vielleicht den nötigen Aufschluss geben:
https://www.herber.de/bbs/user/6601.xls
Grüße Boris
Anzeige
AW: Eine kleine Beispieldatei...
Michael
Hallo Boris,
Ich habe erst eben Deine Antwort gelesen.
Genauso hatte ich mir das vorgestellt. Vielen Dank.
Ich werde versuchen Deine Tabelle in meine einzufügen.
Michael
AW: Drop down menu erstellen
zaske
hallo michael
wenn die liste nicht mit den neuen einträgen ergänzt werden soll, reicht es aus, in der gültigkeitsprüfung die fehlermeldung abzuschalten.
gruß
frank

308 Forumthreads zu ähnlichen Themen

Dropdown Menue zum Sheets wechseln
Peter

Hallo,
ich habe ein kleines Vorhaben: Ein DropDown Menue innerhalb der Sheets zur Sheetnavigation, dh.
A) Ich brauche in den Feldern A1, B1 auf jedem Tabellensheet ein Dropdown Menü.
B) Dieses Menü soll - wenn man es öffnet - alle vorhandenen Tabellensheets anzeigen.
C) Wenn man...
28.10.2008 14:57:47
Thread-ID: 1019959
4 Beiträge
Anzeige
Bilder über Dropdownmenü laden
Hardy

Hallo Zusammen,
ich würde gerne über ein Dropdownmenü unterschiedliche Bilder in einem Excelarbeitsblatt anzeigen lassen. Es gibt 4 unterschiedliche Bilder die angezeigt werden sollen.
Nun meine Fragen:
Wie kann ich über ein Dropdownmenü ein Makro starten.
Und wenn das Makro dan...
21.07.2009 15:15:34
Thread-ID: 1090284
2 Beiträge
Drop Down Menü formatieren
Guido

Hallo,
hab eine Frage zur Formatierung eines Drop Down Menü:
habe ein Drop-Down-Menü erstellt (mit „Daten - Gültigkeit“ usw.) und ein davon abhängiges 2. Menu (über indirekten Bezug auf den Namen). Funktioniert soweit problemlos.
Nun hätte ich gerne noch, dass wenn der Eintrag im 1...
28.07.2009 20:01:27
Thread-ID: 1092006
5 Beiträge
Anzeige
Zelle unter DropDown-Menü / ComboBox
Markus

Hallo zusammen,
ich möchte das eine Gültigkeitsliste über eine ComboBox angezeigt und per DropDown ausgewählt werden kann (wegen Anzeige einer größeren Auswahlliste). Soweit so gut. Jetzt ist es aber so, dass die ComboBox logischerweise über einer Zelle liegt die per Pfeiltaste angesteuert...
03.09.2009 20:04:55
Thread-ID: 1100305
4 Beiträge
Dynamisches Diagramm mit Dropdown-Menü
lorenz1980

Hey,
nachdem Beverly mein erstes großes Problem grandios gelöst hat, ein weiteres :-/
Situation: Ich habe eine Tabelle mit vielen Spalten, wie z.b.:
Höhe - Länge - Breite - Masse - Tempo - Wert
Nun hätte ich gerne ein neues Datenblatt, in dem es zb. zwei Dropdown-Menüs gibt: das...
24.09.2009 23:38:34
Thread-ID: 1105388
6 Beiträge
Zellenformat per Dropdownmenü
Jan

Hello Excelianer,
ich möchte in einer Spalte Geldbeträge in verschiedenen Währungen auflisten.
Um die Bedienfreundlichkeit zu gewährleisten, würde ich gern das Währungsszeichen als Drop-Down Menü zur Verfügung stellen.
Das ganze sähe dann idealerweise so aus:
Der Nutzer trägt ei...
03.12.2009 17:42:25
Thread-ID: 1121636
2 Beiträge
Dropdown aus Gültigkeitsliste mit Pfeil verlassen
Judith

Hallo,
ich muss eine ellenlange Liste mit Datensätzen erstellen in die viele Gültigkeitslisten eingebaut sind.
Dazu habe ich einen Code gefunden bei dem die Gültikeitsliste einer Zelle beim Aktivieren sofort aufklappt.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) On...
10.03.2010 11:55:02
Thread-ID: 1144720
6 Beiträge
variables Drop-down-Menü
Dirk

Hallo Forum,
gibt es eine Möglichkeit eine Dropd-down-Liste (über die Gültigkeitsfunktion angelegt) variabel zu gestalten. Sprich: Wenn in Spalte A bspw. eine "1" steht, dann nutze die Liste "Inhalte Block 1" und wenn eine "2" dort steht, dann nutze die Liste "Inhalte Block 2"
Generell...
08.06.2010 11:08:31
Thread-ID: 1160787
6 Beiträge
Anzeige

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