Avatar billede passiflora Juniormester
13. oktober 2010 - 15:17 Der er 4 kommentarer og
1 løsning

Skjule linier ...

Jeg har tidligere fået hjælp til at skjule linier med makro ...

... dengang havde jeg brug for at teste på en enkelt kolonne, nu har jeg brug for at teste på to kolonner, troed at jeg blot kunne ændre området ...

... men det virker selvfølgelig ikke ...

Jeg brugte ... Range("g199:g221").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True

... og ville så bare ændre området til Range("f199:g221")

What to do best ...

Pf tak
Avatar billede excelent Ekspert
13. oktober 2010 - 15:38 #1
virker ok her !
Avatar billede passiflora Juniormester
13. oktober 2010 - 15:54 #2
Ja den folder ikke sammen hvis begge celler i linjen er udfyldt, jeg har brug for at den ikke folder sammen hvis blot een af cellerne er udfyldt ...
Avatar billede excelent Ekspert
13. oktober 2010 - 16:08 #3
Sub Skjul()
Dim rng As Range
For Each c In Range("F199:F221")
If c = "" And c.Offset(0, 1) = "" Then
  If rng Is Nothing Then
    Set rng = c
    Else
    Set rng = Application.Union(rng, c)
  End If
End If
Next
rng.EntireRow.Hidden = True
Set rng = Nothing
End Sub
Avatar billede passiflora Juniormester
14. oktober 2010 - 08:43 #4
Tak mr. Excelent ...

Det virker jo ...
Sender du ikke lige et svar.

Tak for hjælpen

Søren
Avatar billede excelent Ekspert
14. oktober 2010 - 15:49 #5
velbekom
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