VBA - EXCEL - AutoFilter - und Objektbereichsmethode

Möglicherweise sind in einer Excel-Tabelle mehrere Filtertypen erforderlich, um die VBA-Programmierung zu vereinfachen. Eine Excel-Tabelle vereinfacht mühsame Berechnungen, und das Festlegen von Filtern ist wichtig. Dies hilft beim Festlegen eines Bereichs in Excel mithilfe einfacher Programme in VBA. Bei der Hauptabfrage geht es darum, wie Objekte in einem Objektbereichsformat abgerufen werden. Der folgende Artikel ist eine kleine VBA-Programmierstunde zum Auswählen eines automatischen Filters und eines Objektbereichs im Feld einer bestimmten Zelle in einer Excel-Tabelle. Initiieren Sie es, indem Sie ein Makro starten und das Sub-VBA-Programm beenden. Die Zellen müssen aktiv sein und dürfen nicht durch Filter verborgen werden.

Problem

Mit der VBA-Programmierung ist es möglich, Filter auf einem Blatt festzulegen:

•  Selection.AutoFilter Field: = 1, Criteria1: = "FOO" 

• Der Filter zeigt eine bestimmte Anzahl von Zeilen basierend auf definierten Kriterien an.
• Wie rufe ich diese Zeilen in Range-Objekten ab?

Lösung

Dies sollte Ihr Problem beantworten:

 Sub Macro2 () Sun rngSelect As Range 'Ich nahm an, dass sich die Filter in Zeile 1 Range ("A1") befinden. Wählen Sie 'Filtering' Selection.AutoFilter Field: = 1, Criteria1: = "FOO" Selection.AutoFilter Field: = 7 Criteria1: = "* paris *" 'RngSelect = alle Zellen sichtbar (nicht vom Filter verborgen)' Contiguous to the aktive Zelle Setze rngSelect = ActiveCell.CurrentRegion.SpecialCells (xlCellTypeVisible) 'Kopiere den ausgewählten Bereich rngSelect.Copy Debug.Print rngSelect.Address' ... 'Befehle' Viele und verschiedene '... Setze rngSelect = Nothing End Sub