Avatar billede banazmi Nybegynder
04. februar 2003 - 11:36 Der er 8 kommentarer

Hvis en celle er tom, skal hele rækken slettes

Hej
Jeg skal have lavet en "hvis" formlen, således at hvis en celle i en markeret område i en kolon er tom, så skal hele række i regnarket slettes. hvordan gør jeg det ?
Avatar billede jkrons Professor
04. februar 2003 - 11:52 #1
Det kan du ikke gøre med en Hvis formel eller med nogen anden formel. Du er nødt til at anvende en makro.

Kan du evt. være lidt mere specifik omkring hvad du ønsker.
Avatar billede bak Forsker
04. februar 2003 - 12:26 #2
Du kan køre denne makro. Når den kører skal du udpege en celle i den kolonne hvor der ikke må være tomme celler.

Sub DeleteEmptyRows()
    Dim LastRow As Long
    Dim r As Long
    Dim Kol As Range
    Set Kol = Application.InputBox("udpeg en celle i kolonner hvor de tomme celler findes", Type:=8)
    LastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count
    Application.ScreenUpdating = False
    For r = LastRow To 1 Step -1
        If IsEmpty(Cells(r, Kol.Column)) Then Rows(r).Delete
    Next r
End Sub
Avatar billede palle_ib Nybegynder
04. februar 2003 - 13:08 #3
Bak skal du måske ikke lige have en
Application.ScreenUpdating = True igen?
Er der forresten nogen der har lagt mærke til at XP's Subtotal udgave også har glemt det? Så det kan ske?
Avatar billede bak Forsker
04. februar 2003 - 15:01 #4
palle ib -> det er ikke strengt nødvendig, da excel automatisk slår screenupdating til igen ved afslutning af en sub, men du har da ret i at det er en god skik.
Avatar billede palle_ib Nybegynder
05. februar 2003 - 08:10 #5
bak -> Det forstår jeg ikke - Har du prøvet at køre en subtotaler i XP? Jeg havde problemer med at det ark man kørte en subtotal på ikke ville opdatere skærmen hvorfor man selv måtte køre Application.screenupdating = True for igen at kunne bruge det ark man arbejdede på.
Har du prøvet den eller har de fået den rettet i en senere SR.
Avatar billede bak Forsker
05. februar 2003 - 16:20 #6
Jeg har desværre ikke prøvet XP, men i min 2000 er der ingen problemer med at undlade Application.ScreenUpdating = True

Prøv lige selv at køre makroen uden og se om den ikke sammentrækker linierne uden indgreb.
Jeg vil gerne høre resultatet.
Avatar billede palle_ib Nybegynder
06. februar 2003 - 11:50 #7
Jeg har desværre ikke XP længere (skiftet job), men det var ikke nogen macro men standard funktionen fra MS hvor der var fejl. Billedet blev stående og det var ikke muligt at flytte musen eller andre ting. Men når man kørte en Application.ScreenUpdating = True så var den til at arbejde med igen!
Avatar billede bak Forsker
17. februar 2003 - 21:36 #8
banazmi -> virker det ?
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