Bestem antall regneark via VBA

Anonim

Hvordan bruke en makro for å finne ut hvor mange regneark som er i

Mange makroer er designet for å gå gjennom alle regnearkene i en arbeidsbok for å utføre en bestemt oppgave. For å gjøre dette, opprett en løkke der arkene i en mappe kjøres gjennom det ene etter det andre.

Hvis du vil bestemme hvor mange tabeller det er i en arbeidsbok, kan du bruke egenskapen Regneark. Antall bruk. Følgende makro viser hvordan du bruker denne egenskapen til å spørre etter antall regneark i den aktive arbeidsboken:

Delposisjon antall tabeller faste ()
Dim A Som streng
Dim nummer som heltall
Count = ActiveWorkbook.Worksheets.Count
A = MsgBox ("Denne arbeidsboken har" & nummer & _
"Regneark.", VbOKOnly, "Antall tabeller")
Slutt Sub

Når Excel er startet, viser antallet regneark i et lite vindu, som vist i figuren nedenfor.

Tips: Hvis du vil vite hvordan du skriver inn og starter makroer i Excel, finner du en kort beskrivelse her: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html