Nach Formeln filtern (VBA)
#1
Hallo,

ich würde gerne nach dem Enthalt von Formeln filtern.
Der "Code" unten macht, glaube ich, deutlich, was ich möchte.

Ein Beispiel zum Ausblenden der "Nichtformel"-Zeilen habe ich schon gefunden, ich muß aber filtern, da bei reinem Ausblenden das "Runterziehen" nicht klappt, dh, dass mit Ausblenden die ausgeblendeten Zeilen beim Runterziehen mit betroffen sind.

Ich brauche es beruflich und bin VBA-Anfänger. Eine Lösung wäre ein schönes Lehrbeispiel für mich.

Herzlichen Dank!!


Code:
Sub Formelfilter()

ActiveSheet.Range("A1:C100").AutoFilter _
 field:=3, _
 Criteria1:=Cell.HasFormula
 
End Sub
Top
#2
Hallöchen,

blende die Zellen nicht einfach aus, sondern markiere die "Formelzeilen"  in einer zusätzliche Spalte mit "x" und filtere danach.
Du könntest alternativ die Zellen einfärben, nach Farben filtern. und dann die Farben wieder raus nehmen.
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Top
#3
Hallo schauan,

ja, das wäre eine Möglichkeit. Vielen Dank!

Ein direktes Filtern nach Formel ... wo es doch dieses ".HasFormula" gibt ... scheint aber nicht möglich zu sein?
Das wäre ja noch eleganter.
Top
#4
Wahrscheinlich werde ich jetzt wieder beschimpft, aber das klingt nach einem schlechten Modell.
Wenn in einer Spalte Formeln verwendet werden dann sollte die selbe Formel in allen Zeilen der Spalte stehen. Keine leeren Zellen oder unterschiedliche Formeln.
Wir sehen uns!
... Detlef

Meine Beiträge können Ironie oder Sarkasmus enthalten.

Top
#5
Hallöchen,

Zitat:Wahrscheinlich werde ich jetzt wieder beschimpft
Ich hoffe doch, nicht.
Ich denk bei so einer Frage nicht nur an Listen, sondern auch an Formulare. Oder an eine auch ab und an gestellte Frage, wo in eine Zelle Formeln oder manuelle Einträge rein sollen. Oder ..

Zitat:Ein direktes Filtern nach Formel ... wo es doch dieses ".HasFormula" gibt .

Jein, so was geht nicht. ...je nachdem

Ich komme mal wieder auf die Farben zurück. Ich habe hier eine bedingte Formatierung mit ISTFORMEL. Den Zellhintergrund habe ich dafür auf weiß gestellt. Damit kannst Du dann die weißen Zellen filtern, die hier die Formeln enthalten. Wenn Du es anders herum willst, negierst DU das Ergebnis von ISTFORMEL

Arbeitsblatt mit dem Namen 'Tabelle1'
A
1Angabe
20
31

ZelleFormel
A2=B2

Zellebedingte Formatierung...Format
A21: ISTFORMEL(A2)abc
A31: ISTFORMEL(A3)abc
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Top
#6
(28.10.2018, 11:23)shift-del schrieb: Wahrscheinlich werde ich jetzt wieder beschimpft, aber das klingt nach einem schlechten Modell.
Wenn in einer Spalte Formeln verwendet werden dann sollte die selbe Formel in allen Zeilen der Spalte stehen. Keine leeren Zellen oder unterschiedliche Formeln.


Hallo shift-del,

grundsätzlich hast du ja recht. Aber Wunsch und Wirklichkeit differieren oft. Im heutigen zwar unproduktiven aber realen Zeitdruck im Beruf bedarf es manchmal leider ein wenig Pfusch um durchzukommen.


(28.10.2018, 12:09)schauan schrieb: Ich komme mal wieder auf die Farben zurück. Ich habe hier eine bedingte Formatierung mit ISTFORMEL. Den Zellhintergrund habe ich dafür auf weiß gestellt. Damit kannst Du dann die weißen Zellen filtern, die hier die Formeln enthalten. Wenn Du es anders herum willst, negierst DU das Ergebnis von ISTFORMEL

Herzlichen Dank schauan,

ist ja eine ganz gut brauchbare Lösung, wenn man schon nicht direkt nach Formel filtern kann.
ISTFORMEL kann ich im Job leider nicht benutzen, da hier Excel 2010 im Einsatzt ist.
(Die Bude baut gerade den weltgrößsten Röntgenlaser :92:  )
Aber hierfür gibt es ja den workaround: https://www.tabellenexperte.de/zellen-au...erpruefen/
(Hilfsspalten find' ich doof)
Top
#7
Hallo Wolle,

Zitat:ISTFORMEL kann ich im Job leider nicht benutzen, da hier Excel 2010 im Einsatzt ist.

ja, da wär' die Angabe der Version vom Zielsystem von Vorteil. 2010 ist ja nicht 2016 Sad
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Top
#8
Deine Lösung (ISTFORMEL) hat mich ja erst dazu gebracht eine Ersatzlösungen für ISTFORMEL zu finden zu können, nachdem ich feststellen musste, dass diese Funktion vor 2013 nicht verfügbaer ist.
Ich bin Deiner Lösung superdankbar! Nun habe ich sowohl eine Lösung für Zuhause (2016), in der Firma (2010) und in der Zukunft in irgendwelchen Firmen.
Also nochmal vielen Dank! Das hat mich schonmal wieder ein gutes Stück weitergebracht.
schauan->:100:<- ich
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste