Print side | Luk vindue

Knap til opdatering af filtrer...

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=339
Udskrevet den: 24.Maj.2024 kl. 13:39


Emne: Knap til opdatering af filtrer...
Besked fra: MHH
Emne: Knap til opdatering af filtrer...
Posteringsdato: 07.Maj.2011 kl. 08:46
Hey..
 
Efter at have studeret flere af jeres genialiteter, ønsker jeg nu en knap i arket "Indtast",
der kan opdatere det filter jeg har på arket "print"
Således at kun de benyttede varer fremgår på arket print..
 
Andre løsninger er mere end velkommen..
 
Tak for hjælpen og God Weekend
 
MHH
uploads/263/Opmåling....xlsm - uploads/263/Opmåling....xlsm


Svar:
Besked fra: rassten
Posteringsdato: 07.Maj.2011 kl. 12:49
måske noget i stil med 


Sub a_test()

With Sheets("Print").Range("A3").AutoFilter = False
Sheets("Print").Range("A3").CurrentRegion.ClearContents
Sheets("Indtast").Range("A3").AutoFilter Field:=3, Criteria1:="<>"
Sheets("Indtast").Range("A3").CurrentRegion.Copy Destination:=Sheets("Print").Range("A3")
End With

With Sheets("Indtast").Range("A3").AutoFilter = False
End With
End Sub



-------------
VH rassten

Arbejde excel 2010
Privat excel 2010

Besked fra: MHH
Posteringsdato: 07.Maj.2011 kl. 14:50
Hey Rassten
 
Spot On
 
Jeg kan IKKE TAKKE dig nok
 
God Weekend
 
MHH
 
 


Print side | Luk vindue