Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1876to1880
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
Inhaltsverzeichnis

Position der DropDown Auswahl ausgeben

Position der DropDown Auswahl ausgeben
13.04.2022 14:05:06
Joerg
Hallo,
ist es möglich bei einer DropDown Liste (erstellt über Daten - Datenüberprüfung ) per VBA die Position der Auswahl auszuwerten und nicht den String.
Also, ich brauche bei Auswahl des ersten Eintrags eine 1, beim 2. eine 2 usw.
Gruß Jörg

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

Betreff
Datum
Anwender
Anzeige
Verwende dafür alternativ...
13.04.2022 14:07:22
{Boris}
Hi,
...das Kombinationsfeld aus den Formularsteuerelementen - die geben von Haus aus nicht den Eintrag selbst, sondern dessen Index innerhalb der Auswahlliste zurück.
VG, Boris
AW: Verwende dafür alternativ...
13.04.2022 15:19:33
snb

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Validation.Type = 3 And Target  "" Then MsgBox Application.Match(Target, Range(Mid(Target.Validation.Formula1, 2)), 0)
End Sub

Bei Datenüberprüfung-Liste...
13.04.2022 14:14:43
{Boris}
Hi,
...kannst Du die Position des Eintrags z.B. so ermitteln:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "C1" Then
Target.Offset(0, 1) = Application.Match(Target, Range("A:A"), 0)
End If
End Sub
Die Daten für die Listenauswahl stehen in Spalte A, beginnend bei A1. Die Zelle mit der Datenüberprüfung (Liste) ist C1.
VG, Boris
Anzeige
AW: Bei Datenüberprüfung-Liste...
13.04.2022 14:31:41
Joerg
Hi,
vielen Dank für Deine Mühen, aber "Worksheet_Change" hasse ich wie die Pest.
Ich hatte gehoft das ginge einfacher, so nach dem Motto "DropDown.Pos".
Ich werde das irgendwie anders lösen.
Gruß Jörg
Musst Du ja nicht via Change-Ereignis machen...
13.04.2022 14:44:56
{Boris}
Hi,
...die Logik für die Ermittlung des INDEX ist doch nur Match - wie auch immer Du das in Deinen Code einbaust.
VG, Boris
Eine seltsame Einstellung bei Basiskenntnissen oT
13.04.2022 15:17:45
EtoPHG

AW: Position der DropDown Auswahl ausgeben
13.04.2022 15:06:22
GerdL
Hallo Jörg!
MsgBox [MATCH(A2:A10,C1,0)]
Gruß Gerd
AW: Position der DropDown Auswahl ausgeben
13.04.2022 15:22:06
snb

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Validation.Type = 3 And Target  "" Then MsgBox Application.Match(Target, Range(Mid(Target.Validation.Formula1, 2)), 0)
End Sub

Anzeige
die Position und nicht den String ...
13.04.2022 15:52:00
Rudi
... sieht so aus, als ob er die gleichen Einträge mehrfach in der Auswahlliste hat.
Dann versagt Match natürlich.
Gruß
Rudi

224 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige