Sådan tælles linienumre i Excel VBA

Tekst i en Excel-celle kan spænde over flere linjer. For eksempel kan celler i et ark, der viser medarbejdere, indeholde udvidede kommentarer til hver enkelt arbejds præstation. Excel styrer antallet af linjer i en sådan blok ved hjælp af linjefoderstegnet 'CHAR (10)'. Visual Basic til applikationer, også kaldet VBA, kan tælle linienumre ved at tælle antallet af linjefoderstegn i en celle. En måde at gøre dette subtraherer tekstens længde uden, at linjen feeds fra dens længde med dem.

1.

Klik på 'Udvikler' i Excel's menulinje.

2.

Klik på Visual Basic-ikonet i fanebåndet Kode-kode for at starte vinduet Visual Basic for Applications.

3.

Brug projektfeltet i skærmens øverste venstre hjørne til at navigere til det modul, hvor du vil skrive din kode.

4.

Skriv følgende kode i modulet:

Dim lineNumber Som heltal = LEN (adresse) - LEN (SUBSTITUTE (adresse, CHAR (10), ''))

5.

Erstat begge forekomster af 'adresse' i formlen med adressen på den celle, hvis linjenummer du vil tælle. Hvis du f.eks. Vil tælle linjerne i celle E2, skal du ændre koden til:

Dim lineNumber As Integer = LEN (E2) - LEN (SUBSTITUTE (E2, CHAR (10), ''))

Variablen lineNumber gemmer nu cellens antal linjer.

Tip

  • Hvis fanen Udvikler ikke vises i båndet, skal du klikke på knappen Office øverst til venstre i Excel-vinduet og vælge 'Excel-indstillinger'. Marker afkrydsningsfeltet ud for 'Vis fanen Devloper i båndet', og klik på 'OK'.