VBA - EXCEL - AutoFilter en Object Range-methode

Het kan zijn dat er meerdere typen filters in een Excel-sheet nodig zijn om VBA-programmering te ondersteunen. Een Excel-werkblad wordt gebruikt om saaie berekeningen te vereenvoudigen en het instellen van filters is belangrijk in het proces. Dit zal helpen bij het instellen van een bereik in Excel met behulp van eenvoudige programma's in VBA. De belangrijkste vraag die mensen hebben, is hoe objecten in een objectbereikindeling kunnen worden opgehaald. Het onderstaande artikel is een kleine VBA-programmeerles over het selecteren van een autofilter en een objectbereik in het veld van een bepaalde cel in een Excel-blad. Start het door een macro te starten en het sub VBA-programma te beëindigen. De cellen moeten actief zijn en niet worden verborgen door filters.

Kwestie

Met VBA-programmering is het mogelijk om filters op een blad in te stellen:

  •  Selection.AutoFilter Field: = 1, Criteria1: = "FOO" 
  • Het filter geeft een bepaald aantal regels weer op basis van gedefinieerde criteria.
  • Hoe deze rijen terug te halen in een Range-object?

Oplossing

Dit zou uw probleem moeten beantwoorden:

 Sub Macro2 () Zon rngSelecteren als bereik 'Ik ging ervan uit dat de filters op lijn 1 bereik (' A1 ') staan. Selecteer 'Filtering' Selection.AutoFilter Field: = 1, Criteria1: = "FOO" Selection.AutoFilter Field: = 7 Criteria1: = "* paris *" 'RngSelect = alle cellen zichtbaar (niet verborgen door het filter)' Grenzend aan de active cell Set rngSelect = ActiveCell.CurrentRegion.SpecialCells (xlCellTypeVisible) 'Kopieer het geselecteerde gebied rngSelect.Copy Debug.Print rngSelect.Address' ... 'Commands' Many and varied '... Set rngSelect = Nothing End Sub 
Vorige Artikel Volgende Artikel

Top Tips