Office: Autofilter mit Schleife

Guten Tag liebe Forumnutzer

Habe mir die letzten Stunden die Finger in Google wund getippt und leider keine Lösung gefunden. Vielleicht könnt ihr bei diesem (eigentlich simple) Problem weiterhelfen:

System: Windows 10, Excel 2016

Ziel: Im Tabellenblatt "Input_1" soll in der Zeile 1 einen Autofilter gesetzt werden. In der Spalte "AF" befinden sich diverse Werte (Namen von Vereinmitgliedern). Jeder Name soll angewählt und anschliessend ein Makro ausgeführt werden.

Ist dies möglich? Kann mir jemand weiterhelfen?

Vielen Dank für eure Bemühungen! Ich verzweifle langsam *frown.gif* ...

LG
Stefan

:)

 

Hi Stefan,

was meinst du mit "angewählt" - soll nach diesem Namen gefiltert werden?

 

Hola,

zur Info:

http://www.office-loesung.de/p/viewt...f=166&t=713837

Gruß,
steve1da

 

Hi!
Ganz kurz:
Es gibt Range.SpecialCells(xlCellTypeVisible)
Dadurch kann man schleifen.

Gruß Ralf

 

Hi,

Code:

Und beachte das nächstemal bitte, dass in diesem Forum Crossposting nicht gerne gesehen ist.

 

Guten Tag Beverly

Bitte entschuldige den Crosspost. Werde das positive Ergebnis aber an beiden Orten vermerken :-).

Leider erscheint bei mir die Fehlermeldung:
Laufzeitfehler '91': Objektvariable oder With-Blockvariable nicht festgelegt.

Wenn ich auf debuggen klicke, wird folgende Zeile markiert:
varDaten = ActiveSheet.AutoFilter.Range.Columns(32)

Kannst du mir da weiterhelfen?

Nochmals vielen Dank!!

LG

 

Hi,

du schriebst doch, dass du in Zeile 1 einen Autofilter hast und in Spalte AF die Namen stehen hast - also nahm ich logischerweise an, dass dein Autofilter von Spalte A bis (mindestens) Spalte AF (Spalte 32) geht - wenn das nicht der Fall ist, musst du die 32 an deine Bedingungen anpassen. Zählung beginnt in der ersten Spalte des Autofilters.