• 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.

AutoFilter in VBA activeren bij openen Excel-sheet

Status
Niet open voor verdere reacties.

Gert Bouwmeeste

Verenigingslid
Lid geworden
28 nov 2007
Berichten
827
Hoi,

Ik wil een macro uitgevoerd hebben op het moment dat een workbook geopend wordt. Dat lukt me niet om twee redenen:
a) de macro doet niks als het workbook geopend wordt;
b) als ik de macro handmatig uitvoer dan kan ik niet testen of AutoFilter al actief is. Als er al een AutoFilter actief is, dan wordt deze gedisabled

Wat doe ik fout?

De macro staat op Blad1 (Blad1)

Code:
Private Sub Workbook_Open (ByVal Target As Range)
'
' AutoFlter_Inschakelen Macro
    Range("A1:X25000").AutoFilter
    
    Range("A2").Select
    Selection.End(xlDown).Select
    ActiveCell.Offset(1, 0).Range("A1").Select
    'Selection.AutoFilter
    
End Sub
 
Gert,

Code:
If ActiveSheet.AutoFilterMode Then ActiveSheet.AutoFilterMode = False
test of autofilter actief is, zo ja dan wordt autofilter uitgeschakeld

Volgens mij moet de macro staan in ThisWorknook
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan