Søg
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
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Måned og år på graf Af mort1 i Excel 2 I går 13:01 9 minutter siden
VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel 9 23/09/202618:11 24/09/202611:16
Ændre tal i en celle Af xvid i Excel 1 04/09/202616:05 04/09/202616:54
Kan Excel selv beregne alder? Af leahcim i Excel 7 31/08/202610:24 04/09/202602:08
problem med mailbesked Af Pestilensen i Excel 3 24/08/202611:16 28/08/202612:55
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 13:01 Måned og år på graf Af mort1 i Excel
I går 12:28 2 diske Af dcedata1977 i Andet hardware
I går 12:06 Ekstra til TV 2 : "Tilkøb" + "TV2 Ude" Af Ikke-ekspert i Fjernsyn & projektorer
I går 10:20 ASP classic kopiere database fil på server Af bsn i ASP
30/1015:04 Kan Medie Player overspille en CD ? - Hvordan Af Ikke-ekspert i Musik & videoafspillere
White papers
Flere white papers »