Avatar billede AThomsenS Nybegynder
27. januar 2010 - 15:19 Der er 1 kommentar

Macro til sletning af linier

Hej,

Jeg har en HTML fil som indeholder en masse brugbar data - men desværre også en masse ubrulig.

Når jeg åbner filen i Excel, så det brugbare data har et helt tal stående i A-kolonnen. Hvis det er ubrugtlig info, så er A-kolonnen enten tom eller indeholder bogstaver.

Dvs. jeg skal lave en macro der i bund og grund laver et løbende check der hedder HVIS(A1:A1000=et tal;behold linie;Slet linie).

Nu har jeg kun rodet med Macroer der laves via indspilningsværktøjet :( Der har du så vidt jeg ved ikke mulighed for at lave sådanne logiske test.

Nogen der kan hjælpe mig på vej :)
Avatar billede kabbak Professor
27. januar 2010 - 15:30 #1
Public Sub SletIkkeTaltal()
    Dim I As Long
    For I = Range("A65536").End(xlUp).Row To 1 Step -1
        If Not IsNumeric(Cells(I, 1)) Then
            Cells(I, 1).EntireRow.Delete
        End If
    Next
End Sub
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
Stort udvalg af Excel kurser til alle niveauer og jobfunktioner

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