| On 8 Jul., 12:41, Claus Busch <claus_bu...@t-online.de> wrote:
> Hallo Walter,
>
> Am Fri, 8 Jul 2011 03:23:58 -0700 (PDT) schrieb Walter Heying:
>
> > Sub Makro1()
> > Dim zähler, spaltenNr, Kriterium, zählerende, Filter
> > Filter = """"A", "B", "C""""
> > Rows("3:3").AutoFilter Field:=3, Criteria1:=Array(Filter),
> > Operator:=xlAnd
> > ' Inaktive Zeilen (Filter mittels Makroaufzeichnung |
|
 |
|
 |
Group: de.comp.officepakete.msoffice.excel · Group Profile · Search for Makro1 in de.comp.officepakete.msoffice.excel
Author: Walter Heying
Date: Jul 8, 2011 03:51
Hallo Walter, Am Fri, 8 Jul 2011 03:23:58 -0700 (PDT) schrieb Walter Heying: Sub Makro1() Dim zähler, spaltenNr, Kriterium, zählerende, Filter Filter = """"A", "B", "C"""" Rows("3:3").AutoFilter Field:=3, Criteria1:=Array(Filter), Operator:=xlAnd ' Inaktive Zeilen (Filter mittels Makroaufzeichnung erstellt) ' ActiveSheet.Range("$A$3:$BD$200000").AutoFilter Field
|