Mit Autofilter selectierte Zellen verarbeiten

ich habe immer noch das Problem das ich in mehreren Macros
nur die mit dem Autofilter selectierten und damit sichbaren Zellen verarbeiten möchte,
d.h. ich möchte in der Spalte B einen Counter setzen der bei jeder sichtbaren Zelle hochzählt und den Wert in z.b. B11 einträgt.

Gruss Jörg