Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: deselectie van autofilter  (gelezen 1791 keer)

0 leden en 1 gast bekijken dit topic.

Offline dimy

  • Volledig lid
  • **
  • Berichten: 205
  • Oplossing.be
deselectie van autofilter
« Gepost op: 06 februari 2006, 17:43:01 »
Beste,
In een bepaalde sheet gebruik ik een autofilter om bepaalde rijen wel of niet te kopiëren.
De VBA code voor een macro die wordt aangestuurd ziet er zo uit:
Selection.AutoFilter
    Selection.AutoFilter Field:=1, Criteria1:="0"
Bij een volgende keer dat de workbook open gedaan wordt zijn enkel die rijen zichtbaar met criteria="0".
Manueel kan dit aangepast worden door op het pijltje van de autofilter voor "all" te kiezen.
Dit zou ik graag automatisch laten gebeuren door bvb een code in VBA. Deselectie autofilter of zoiets.
voorbeeld:
Workbook open()
worksheets("-----").activate
worksheets("-----").range("A1").activate
->hier zou deselectie van autofilter moeten komen


Wie kan mij hierin helpen?
Dank voor jullie breinbrekend werk.
Di
Desktop Windows 10   NLD 64 bits
ASUSTeK COMPUTER INC. H110M-C 8 GB Intel(R) Core(TM) i7-7700 CPU @ 3.60GHz - 1400
Intel(R) HD Graphics 630 1024MB 1920  x 1080
Realtek High Definition Audio
Western Digital WDC WD10EZRZ-00HTKB0
 Samsung SSD 860 EVO 250GB  C:\ NTFS 232 GB 191 GB
                                                D:\ NTFS 1Tb
McAfee VirusScan Enterprise
Windows Defender
Windows Firewal Enabled True

Offline WG

  • Ervaren lid
  • ***
  • Berichten: 366
  • Geslacht: Man
  • http://www.wimgielis.be
Re:deselectie van autofilter
« Reactie #1 Gepost op: 06 februari 2006, 20:08:05 »
ActiveSheet.ShowAllData

of:

Sheet("naam").ShowAllData

als je alle gebruikte filters wil doen ineens.



Gebruik

Selection.AutoFilter Field:=1

als je enkel criterium 3 wil veranderen in het tonen van alle records.

WG
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline dimy

  • Volledig lid
  • **
  • Berichten: 205
  • Oplossing.be
Re:deselectie van autofilter
« Reactie #2 Gepost op: 07 februari 2006, 09:33:55 »
Bedankt WG!
Stom van me , ik had een beetje verder moeten kijken.
Desktop Windows 10   NLD 64 bits
ASUSTeK COMPUTER INC. H110M-C 8 GB Intel(R) Core(TM) i7-7700 CPU @ 3.60GHz - 1400
Intel(R) HD Graphics 630 1024MB 1920  x 1080
Realtek High Definition Audio
Western Digital WDC WD10EZRZ-00HTKB0
 Samsung SSD 860 EVO 250GB  C:\ NTFS 232 GB 191 GB
                                                D:\ NTFS 1Tb
McAfee VirusScan Enterprise
Windows Defender
Windows Firewal Enabled True

 


www.combell.com