Datenüberprüfung, Listenwerte per Formel ermitteln

Hallo Excelianer.
Ich bin heute über eine Idee gestolpert, die mir die Arbeit in einem Formblatt erleichtern würde. Vielleicht wisst ihr wie es funktioniert. Wäre schön.
Die Frage: Wie kann man bei der Datenüberprüfung die Liste möglicher Werte (Quelle) per Formel errechnen?
Gültig sein soll (in der einfachen Form) die zwei Werte Zeilen- und Spaltennummer. Noch besser, wenn es je ein Wert aus einer bestimmten Zeile/ Spalte ist, abhängig von der Zellposition.
Beispiel:
    A    B    C    D    E    F
1
2        1    2    3    4    5
3    a
4    b       b,2
5    c
6    d
Die pure Formel für D4 würde so lauten: "=INDEX(A:G;ZEILE();2) & "," & INDEX(1:8;2;SPALTE())". Als Quelle wird das nicht akzeptiert, auch nicht ohne die Verkettung. Könnt ihr mir helfen?
Gruß, Arthur

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("B3:F6")) Is Nothing Then If Target = "" Then Target = Range("A" & Target.Row) ElseIf Target = Range("A" & Target.Row) Then Target = Cells(2, Target.Column) Else: Target = "" End If Cancel = True End If End Sub

…das gewünschte Feature mit konventionellen Methoden zu überlisten, Folks,
dafür ist es zu eng ausgelegt und seit Jahren auch nicht erweitert worden, zumindest nicht bis Xl14/2010.
Die entsprd FehlerMeldungen sind eindeutig! Danach wird für Liste (mit DropDown) zwingend eine direkt eingetragene TextListe oder ein Verweis auf eine Zeile oder Spalte verlangt, keine Fmln, ob benannt und mit Namen oder direkt eingetragen und keine externen ListenTexte. Die gängigen XLM-Fktt dürften hierbei auch nicht helfen (aber evtl gibt's ja noch 'ne exotische)…
Folglich besteht nur die Möglichkeit, diese ListenTexte manuell bzw per VBA in die vorgesehene Zeile einzutragen (sicher am einfachsten, wenn man diese zuvor über eine benannte Fml bildet, denn dann muss diese Fml positionsabhängig nur evaluiert und der erhaltene Text dort eingetragen wdn und man bleibt somit manuell flexibel), falls man das nicht in Gänze simulieren wollte (wie es Michael vorschlägt), oder man muss mit Hilfszellen arbeiten, wobei hier jeder TabZelle 2 QuellZellen zugeordnet wdn müssen wie das nachfolgd Bsp zeigt:

	A	B	C	D	E	F	H	J
2		1	2	3	4	5
3	a
4	b		2	b			b ²	b ³
5	c		c	3			c ²	c ³
6	d

Will man DarstellungsPlatz sparen und die AdressAnpassungsProbleme beim Fml-Ziehen vermeiden, kann man auch eine (mit dem Pinsel formatierte!) VerbundZelle (im Bsp sind's 4) verwenden, die die folgd plurale (mehrzellige) MatrixFml enthalten könnte: H4:K5:{=INDEX((A4:A5;C2:D2);{1.1.1.1;2.1.2.1};{1.1.1.2;1.1.1.2};{1.2.1.2})}
Feedback nicht unerwünscht! Gruß, Luc :-?
Besser informiert mit …

Sub Makro1() Dim r As Range, c As Range Set r = Range("B3:F6") For Each c In r With c.Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:=Range("A" & c.Row) & "," & Cells(2, c.Column) & "," .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .ShowInput = True .ShowError = True End With Next End Sub

Beliebteste Forumthreads (12 Monate)

Datenüberprüfung, Listenwerte per Formel ermitteln

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

299 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Datenüberprüfung, Listenwerte per Formel ermitteln

7 Beiträge zum Forumthread Beiträge zu diesem Forumthread

299 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread