Avatar billede marten123 Nybegynder
19. november 2007 - 12:37 Der er 4 kommentarer og
1 løsning

Delete kun hvis hele rækken er selected

Hej,
Jeg ønsker en makro, der kun deleter activecell.row HVIS hele rækken er selected. Er kun én celle selected, skal den exit'e sub
Avatar billede kabbak Professor
19. november 2007 - 13:22 #1
Public Sub slet()
    Dim Cell As Integer
    Cell = Selection.Cells.Count
    If Cell = 256 Then
        ActiveCell.EntireRow.Delete
    End If
End Sub
Avatar billede marten123 Nybegynder
19. november 2007 - 13:45 #2
thanks. troede mit problem om at den så ikke ville slette flere rækkere (såfemt rækken dækker over celler der er merged) var løst. Men desværre. Smider du et svar?
Avatar billede jkrons Professor
19. november 2007 - 13:45 #3
Eller

If Selection.Address = Selection.EntireRow.Address Then
    ActiveCell.EntireRow.Delete
End If

Denne virker også, hvis der er valgt mere end en hel række.
Avatar billede jkrons Professor
19. november 2007 - 13:48 #4
Så ikke dit svar til kabbak. Så se roligt bort fra min løsning :-)
Avatar billede kabbak Professor
19. november 2007 - 16:55 #5
et svar ;-))
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
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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