Office: INDEX-VERGLEICH mit Verketten

Hallo Karin,

gibt es eine Anzeigemöglichkeit zur Formelwert verfolgung.

Sprich: kann ich es nachvollziehen, auf welche zellen und spalten die werte beziehen?

Gruß

 

Hi,

markiere den betreffenden Formelteil

Bis später,
Karin

 

Hallo Karin,

ich glaube ich habe rausgefunden.

Deine formel beinhaltet 3 Spalten...

ich hab die zwar die Spalten zwar erweitert, jedoch muss doch glaub für jede spalte einen separaten formel erweiterung hinzugefügt werden oder ?

Gruß

 

Hi,

wenn es mehr Spalten sind, dann ja

Bis später,
Karin

 

Hallo Karin,

Excel sagt: Formel ist zu lang :shock:

ich brauche von Spalte R bis CT das sind 81 Spalten


einen Rat was ich machen kann?


Gruß

 

Hi,

eine Formel darf wohl nur 256 Zeichen umfassen, wenn ich richtig informiert bin - offensichtlich sind das bei dir mehr Zeichen. Da wüsste ich jetzt keine andere Lösung, als dass man VBA verwendet. Nun ist die Frage, ob das in deiner Arbeitsmappe möglich (erlaubt) ist.

Bis später,
Karin

 

Hallo!

Ich fürchte, jetzt redet ihr aneinander vorbei.
Am Anfang des Threads habe ich gefragt, ob es zu jedem Suchbegriff IMMER GENAU 3 Ergebnisse gibt. Das hast du bestätigt:

Daraus folgt, dass du du auch GENAU diese 3 Verkettungen brauchst; egal über wieviele Spalten sich dein Bereich insgesamt erstreckt. (Sonst hätte Karin's erste Formel ja auch schon nicht funktionieren können.)
Hat sich inzwischen hier etwas geändert, so dass du z.B. MEHR als 3 Ergebnisse erwartest?

Diese Aussage solltest du etwas präzisieren!
Welche Ergebnisse erhältst du stattdessen?
Kommen deine Suchbegriffe in R:CT alle nur einmalig vor, oder ist auch ein mehrmaliges Auftreten möglich?

 

Hallo schatzi,

Tut mir leid... hab dich glaube falsch verstanden. Ich meinte die Suchwerte die verkettet (zusammen geführt) werden sollen sind immer 3 Begriffe bzw. Zellen und die befinden sich immer an gleiche Stelle.

Die gesuchte Begriffe z.B. "Schokolade" können ca. 50 St. sein

Ich halte (nicht immer) die Werte von anderen Suchbegriffen.

Die Suchbegriffe kommen mehrmals vor jedoch die Werte die verkettet werden sollen sind immer entsprechend identisch.



Gute Nacht... ihr beiden.

 

Hallo!

Dann haben wir uns exakt richtig verstanden, denn genau das war auch meine Frage.

Das Hauptproblem dürfte sein, dass die Suchbegriffe auch MEHRFACH auftreten können und dies scheinbar auch an wild verteilten Orten, denn das würde deine fehlerhaften Ergebnisse erklären.

Obwohl es mit Formeln wohl dennoch machbar sein sollte, wird das wohl recht kompliziert und deshalb neige ich wie Karin hier auch zu einer VBA-Lösung mit einer benutzerdefinierten Funktion:

Code:

Function Kette(Bereich As Range, Kriterium) As String
Dim T As Range
    Set T = Bereich.Find(Kriterium)
    If T Is Nothing Then
        Kette = "Kein Treffer"
    Else
        Kette = T.Offset(1, 0) & " " & T.Offset(1, 1) & " " & T.Offset(1, 2)
    End If
End Function

Kopiere diesen Code in ein allgemeines Modul der Mappe.
Der Aufruf im Tabellenblatt erfolgt dann mit z.B.

=Kette(ZVV!R2:CT2000;N2)

 

Hallo schazi,

wauww.... funzt super.

aber wieso muss ich die Funktion in die gleiche Mappe kopieren?

da die Excel immer aktualiesiert wird, würde ich gerne in persönliche (separate) Mappe speichern wollen.


Gruß

 

Hallo!

Ja, du kannst die Funktion auch in der personl.xls speichern.
Dann steht dir diese Funktion in allen Mappen zur Verfügung.

 

Hi schatzi,

ja, dies habe ich ausprobiert gehabt. funzt aber net :roll:

so sieht es aus:

 

Hallo!

Die Formel müsste dann so aussehen:

=PERSONL.XLS!Kette(ZVV!R2:CT2000;N2)

 

Hallo schatzi,

superrr... ich wusste garnicht dass man die Macro-Quellen angeben kann.

Jetzt ist aber eine ganz andere Problem aufgetaucht. Ich hab den Formel in Zelle eingesetzt und damit bis untere Zelle ausfüllt, die linke-untere ecke getippt.... und schwupps alle zellen ausgefüllt.

Ich hab diese Vorgang per Macrorecorder aufgenommen, jedoch beim abspielen füllt er zwar die Zellen aber kommt hier einen #WERT! Fehler.
Wenn ich über Formel gehe und nochmal mit Enter jede einzelne Zelle bestätige ist der Wert da.

Was verursacht die Wert-Fehler? bzw. wann kann ich hier machen?

Gruß

 

Hallo!

Da kann ich momentan nur raten...

Möglichkeit 1: Erweitere die Funktion selbst:

Function Kette(Bereich As Range, Kriterium) As String
Dim T As Range
Application.Volatile
Set T = Bereich.Find(Kriterium)
If T Is Nothing Then
Kette = "Kein Treffer"
Else
Kette = T.Offset(1, 0) & " " & T.Offset(1, 1) & " " & T.Offset(1, 2)
End If
End Function

Möglichkeit 2:

Füge bei deinem aufgezeichneten Makro über der Zeile "End Sub" noch diese Zeile ein:
Application.Calculate

Möglichkeit 3:

Versuche beide Möglichkeiten zusammen.