Avatar billede dane022 Seniormester
11. december 2007 - 12:37 Der er 2 kommentarer og
1 løsning

Makro til skjul rækker bliver langsom efter et par gange

Nedenstående makro bliver langsom efter et par gange.
Den bliver hentet ved aktivering af bestemt ark via call funktion. Nogen der har et bud?

Public Sub Skjul_f()
    For Each c In Range("f11:f28").Cells
        If c.Value = 0 Then
            Rows(c.Row).Hidden = True
        Else
            Rows(c.Row).Hidden = False
        End If
    Next
    For Each c In Range("f36:f53").Cells
    If c.Value = 0 Then
            Rows(c.Row).Hidden = True
        Else
            Rows(c.Row).Hidden = False
        End If
    Next
End Sub
Avatar billede kabbak Professor
11. december 2007 - 13:35 #1
et gæt ;-))

Public Sub Skjul_f()
ActiveSheet.DisplayPageBreaks = False
    For Each c In Range("f11:f28").Cells
        If c.Value = 0 Then
            Rows(c.Row).Hidden = True
        Else
            Rows(c.Row).Hidden = False
        End If
    Next
    For Each c In Range("f36:f53").Cells
    If c.Value = 0 Then
            Rows(c.Row).Hidden = True
        Else
            Rows(c.Row).Hidden = False
        End If
    Next
End Sub
Avatar billede dane022 Seniormester
11. december 2007 - 15:03 #2
Umiddelbart ser det ud til at have hjulpet, jeg har nu kørt den igennem flere gange uden at den er blevet langsom. Vil det være en idé at indsætte en ActiveSheet.DisplayPageBreaks = true i bunden af koden, eller gør det ingen forskel?
Avatar billede kabbak Professor
11. december 2007 - 15:23 #3
jeg mener ikke det behøves.
Det der sker, er at de sideskift, der blev lavet ved vis udskrift eller udskriv, bliver skjult, men de gendannes ved næste vis udskrift eller udskriv.
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