Netz-Treff

Nachricht aus dem Archiv

effeff schrieb am 27.August.2010, 15:05:18 in der Kategorie pc.sw.office

Excel 2003 - Spezialfilterung??

Hallo,

es sollte eigentlich funktionieren, wenn du die \"Startparameter\" entsprechend anpasst. In folgenden Beispiel befindet sich die Kopfzeile der \"Datenbank\" in Zeile 44, die ID-Spalte ist die Spalte A. Ich habe also einmal den Eintrag, nach dem sortiert werden soll, festgelegt und zweitens die Zeile, ab der nach dem dem Sortieren überprüft und die Zeilen, die nicht passen, ausgeblendet werden sollen. Die beiden Einträge sind jeweils fett:

Sub Spezialfilter_ala_ff()

Selection.Sort Key1:=Range(\"A44\"), Order1:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal

Dim l As Long

l = 45

Do While Cells(l, 1).Value <> \"\"

If Cells(l, 1).Value <> Cells(l - 1, 1).Value And Cells(l, 1).Value <> Cells(l + 1, 1).Value Then
Rows(l).Hidden = True
End If

l = l + 1

Loop

End Sub

Excel 2003 - Spezialfilterung?? Planitzer - 26.August.2010, 09:47:46 - (pc.sw.office)
- Danke effeff - Danke manes: Beides KLASSE!! Planitzer - 27.August.2010, 17:48:32
- Excel 2003 - Spezialfilterung?? Howie - 26.August.2010, 16:30:52
  - Excel 2003 - Spezialfilterung?? Planitzer - 27.August.2010, 07:50:21
- Excel 2003 - Spezialfilterung?? manes - 26.August.2010, 12:22:56
  - Excel 2003 - Spezialfilterung?? Planitzer - 26.August.2010, 12:47:47
    - Excel 2003 - Spezialfilterung?? manes - 26.August.2010, 14:20:05
      - Excel 2003 - Spezialfilterung?? Planitzer - 27.August.2010, 07:53:28
        Excel 2003 - Spezialfilterung?? manes - 27.August.2010, 12:28:47
        Excel 2003 - Spezialfilterung?? manes - 27.August.2010, 15:32:55
- Excel 2003 - Spezialfilterung?? effeff - 26.August.2010, 10:23:57
  - Excel 2003 - Spezialfilterung?? Planitzer - 26.August.2010, 11:05:58
    - Excel 2003 - Spezialfilterung?? effeff - 26.August.2010, 12:24:32
      - Excel 2003 - Spezialfilterung?? Planitzer - 27.August.2010, 07:58:06
        Excel 2003 - Spezialfilterung?? effeff - 27.August.2010, 15:05:18
      - Danke effeff - ich probiere es aus Planitzer - 26.August.2010, 12:48:28