Avatar billede nemlig Professor
27. december 2012 - 16:10 Der er 5 kommentarer og
1 løsning

Makro i delt projektmappe med autofilter

Mulighederne med makroer i delt projketmappe er begrænsende.

Jeg har en delt projektmappe, hvor der anvendes Autofilter og arket er beskyttet.
Det jeg gerne vil er at når en bruger åbner filen, så skal tidligere brugeres indsatte filtre automatisk slås fra så alle poster i regnearket vises.

Nogen løsning på dette?
Avatar billede store-morten Ekspert
27. december 2012 - 16:31 #1
Måske:

Private Sub Workbook_Open()
Sheets(1).AutoFilter.ShowAllData
End Sub

Eller før der lukkes:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets(1).AutoFilter.ShowAllData
End Sub
Avatar billede nemlig Professor
27. december 2012 - 16:39 #2
Sejt - ser ud til at løsning nr. 1 virker.
Er der en nem løsning til at få det til at virke på alle ark eller er det bare.....

Sheets(1).AutoFilter.ShowAllData
Sheets(2).AutoFilter.ShowAllData
Sheets(3).AutoFilter.ShowAllData
osv.
Avatar billede store-morten Ekspert
27. december 2012 - 16:51 #3
Ja, det er vist nemmest ;-)

Private Sub Workbook_Open()
Sheets(1).AutoFilter.ShowAllData
Sheets(2).AutoFilter.ShowAllData
Sheets(3).AutoFilter.ShowAllData
End Sub
Avatar billede nemlig Professor
27. december 2012 - 16:54 #4
Super - tak for hjælpen.
Smid venligst et svar. :)
Avatar billede store-morten Ekspert
27. december 2012 - 16:59 #5
Velbekomme
Avatar billede KurtOA Praktikant
28. december 2012 - 10:57 #6
Hvis du har mange ark kan denne lille kode måske hjælpe dig med at gøre det for dem alle ;-)


Private Sub Workbook_Open()

Dim ws As Worksheet
For Each ws In Worksheets
        If ws.FilterMode Then ws.AutoFilter.ShowAllData
Next

End Sub

mvh Kurt
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester