Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Dropdown Liste öffnen

246 views
Skip to first unread message

Robert Keller

unread,
Mar 27, 2009, 12:18:54 PM3/27/09
to
Hallo
möchte beim Doppelklick auf der Zelle A1 oder A2..
das sich die Zelle als Dropdownliste öffnet.
Die Daten befinden sich aber in der Tabelle2 Spalte A1:A40
beim Anklicken einer Zeile sollen diese in das aktuelle Feld in Tabelle1
übertragen werden.
Gibt es eine VBA -Lösung suche Formel
Danke Robert


Dietmar Vollmeier

unread,
Mar 27, 2009, 12:37:31 PM3/27/09
to
Servus Robert!

*Robert Keller* schrieb am 27.03.2009 um 17:18 Uhr...


> möchte beim Doppelklick auf der Zelle A1 oder A2..
> das sich die Zelle als Dropdownliste öffnet.
> Die Daten befinden sich aber in der Tabelle2 Spalte A1:A40

^^^^^^^^^^^^^^^^^^^^^^^
Benenne diesen Bereich, z.B. als "Daten"

> beim Anklicken einer Zeile sollen diese in das aktuelle Feld in Tabelle1
> übertragen werden.
> Gibt es eine VBA -Lösung suche Formel

Geht weit einfacher :-)

Markiere die gewünschten Zellen A1 oder A2 und klicke anschließend
Menü: Daten -> Gültigkeit -> Einstellungen

Zulassen: Liste
Quelle: =Daten

Unter "Eingabemeldung" und "Fehlermeldung" kanst du noch bestimmen, ob
nur Werte aus der Liste "Daten" erlaubt sind oder auch andere und
gegebenenfalls eine Fehlermeldung erstellen.

--
und tschüss | Aus technischen Gründen befindet sich die Signatur auf der
Didi | Rückseite dieses Beitrags!

Dietmar Vollmeier

unread,
Mar 27, 2009, 12:44:40 PM3/27/09
to
Servus Robert!

*Robert Keller* schrieb am 27.03.2009 um 17:18 Uhr...

> möchte beim Doppelklick auf der Zelle A1 oder A2..
> das sich die Zelle als Dropdownliste öffnet.
> Die Daten befinden sich aber in der Tabelle2 Spalte A1:A40

^^^^^^^^^^^^^^^^^^^^^^^
Benenne diesen Bereich, z.B. als "Daten"

Menü: Einfügen -> Namen -> Definieren

> beim Anklicken einer Zeile sollen diese in das aktuelle Feld in Tabelle1
> übertragen werden.
> Gibt es eine VBA -Lösung suche Formel

Geht weit einfacher :-)

Alexander Wolff

unread,
Mar 27, 2009, 12:45:31 PM3/27/09
to
Die Tastatur von Robert Keller wurde wie folgt gedrückt:

Ungewöhnlich, eine nur temporäre Daten-Gültigkeit! Hoffentlich beschädigst
Du damit nicht gerade deren Zweck. Aber seis drum:
-------------------------------------------------------------------

Doppel-Klicke in VBA auf Deine Tabelle (nicht: normales Modul!)

Füge in das Klassenmodul ein:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Row = 1 And Target.Column = 1 Then
MsgBox "Hello" 'hier stattdessen Gültigkeit Liste zuweisen
Else
'hier Gültigkeit Liste in A1 löschen
End If
End Sub

Da Deine Liste nicht im gleichen Blatt ist, vergibst Du an Ttabelle2!A1:A40
einen Namen, z.B. Paul.

Nun kannst Du mit dem Makrorekorder Daten Gültigkeit Liste aufzeichnen;
Liste dabei: =Paul

Das Löschen der Gültigkeit nimmst Du danach als zweite Aufzeichnung auf.

Dann schiebst Du die Aufzeichnungen in die Then- und die Else-Sektion oben.
--
Moin+Gruss Alexander - MVP for MS Excel - www.xxcl.de - mso2000sp3 --7-2


0 new messages