• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

sortering na filter

Status
Niet open voor verdere reacties.

Depant

Verenigingslid
Lid geworden
5 aug 2015
Berichten
238
Hallo allemaal,

Een macro maakt met een filter een selectie
Hoe krijg ik die selectie die naar c15 wordt gekopieerd weer oplopend gesorteerd?

With Sheets("alles")
.Cells(1).CurrentRegion.AutoFilter 1, Filter(Application.Transpose([if(stam!p1:p20="","~",stam!p1:20)]), "~", False), 7
.Cells(1).CurrentRegion.AutoFilter 5, Filter(Application.Transpose([if(stam!n1:n10="","~",stam!n1:n10)]), "~", False), 7

.AutoFilter.Range.Offset(1).Columns(2).Copy Sheets("verz").Range("c15")





Bijvoorbaat hartelijk dank
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan