Hallo
Möchte folgendes erreichen:
Habe in Zelle C3 einen Filter und wenn ich filtere ändern sich die Daten… logisch. Jetzt möchte ich den Wert unter C3 (das gefilterte Wort) in A1 anzeigen lassen.
Zuerst dachte ich… mit Offset bekomme ich das hin, funktioniert leider nicht… auch logisch, da die Zellen zwar verborgen sind… aber Offset das nicht interessiert.
Gibt es da eine andere Funktion ? Oder wie könnte man das schaffen.
Danke & Gruss
Flexo
Obersten Eintrag einer gefilterten Liste ermitteln
Habe in Zelle C3 einen Filter und wenn ich filtere ändern sich
die Daten… logisch. Jetzt möchte ich den Wert unter C3 (das
gefilterte Wort) in A1 anzeigen lassen.
Hallo Flexo,
du brauchst eine leere Hilfsspalte, nehmen wir mal H, stell dich in H4,
dann Einfügen—Namen. Den Namen „Hoehe“ vergeben für diese Formel:
=(ZELLE.ZUORDNEN(17;Tabelle1!H4)=0)*1
Dann schreibst du in H4 die Formel:
=Hoehe
Jetzt in A1 die Formel:
=INDEX(C4:C500;VERGLEICH(0;H4:H500;0);1)
Gruß
Reinhard
Lieber Reinhard
Da ich ohne Hilfsspalte arbeiten möchte, wäre wohl ein Makto die
beste Lösung… könntest Du mir da auch helfen ?
Gruss
Flexo
Da ich ohne Hilfsspalte arbeiten möchte, wäre wohl ein Makto
die
beste Lösung… könntest Du mir da auch helfen ?
Hallo Flexo,
das Makro ist einfach:
Sub tt()
Range(„A1“) = Range(„A4:A500“).SpecialCells(xlCellTypeVisible).Cells(1, 1)
End Sub
aber, wer ruft es auf? Vba kriegt nix mit wenn du da neu filterst.
Eine von möglichen Alternativen wäre, die Autofilter zu entfernen, in C3 ein Kombinatationsfeld aus Steuerelementtoolbox nehmen.
Dann filtert Vba, somit weiß Vba was da ausgewählt wird und kann beliebig Makros starten.
Gruß
Reinhard
Hallo Reinhard
Habe es probiert. Mit Excel 2007 auf engl. bekomme ich immer die Fehlermeldung „not vaild“. Obwohl ich Get.Cell genommen und alles angepasst habe.
Merkwürdig !!
Du hast recht. das change Ereignis startet das Makro nicht ! Dann wohl doch Hilfszelle. Aber auf engl. Excel bekomme ich das nicht hin.
Danke Dir.
Flexo
Du hast recht. das change Ereignis startet das Makro nicht !
Dann wohl doch Hilfszelle. Aber auf engl. Excel bekomme ich
das nicht hin.
Hallo Flexo,
benutze mal das Komma:
=(GET.CELL(17,Tabelle1!H4)=0)*1
Gruß
Reinhard
Funktion nicht valid !
Muss mir mal eine deutsche Version organisieren.
Gruss
Funktion nicht valid !
Muss mir mal eine deutsche Version organisieren.
Hallo Flexo,
mir war es unklar, deshalb habe ich es im deutcschen 2007 getestet, funktioniert problemlos mit Zelle.Zuordnen()
Nachträglich übrigens großen Dank für meine Erwähnung bei Marian *glaub*, da aus der Schweiz.
Wäre schon finanziell Klasse gewesen, lag aber an mir daß es nicht ging.
Gruß
Reinhard