Bestemme Hvor mange stiler er tilgjengelige

Du kan bestemme antall stiler tilgjengelig i et dokument (når du oppretter en VBA-makro) ved hjelp av grev eiendom med Styles objekt. Dette gjøres ved hjelp av følgende syntaks:

x = ActiveDocument.Styles.Count

der x er variabelen kan du bruke i andre VBA-makro linjer. Merk at denne funksjonen angir hvor mange som har blitt definert, ikke hvor mange av disse faktisk er i bruk. Dette betyr at innebygde stiler er også telles. Hvis du ønsker å utelukke innebygde stiler, kan du gjøre en faktisk iterativ telling av stiler på denne måten:

x = 0
For Hver objStyle i ActiveDocument.Styles
Hvis ikke objStyle.BuiltIn Så x = x + 1
Neste objStyle

WordTips er din kilde for kostnadseffektiv Microsoft Word trening. (Microsoft Word er den mest populære tekstbehandlingsprogrammet i verden.) Dette tipset (803) gjelder for Microsoft Word 97, 2000, 2002, og 2003. Du kan finne en versjon av dette tipset for Båndet av Word (Word 2007 og senere) her: Bestemme Hvor mange stiler er tilgjengelige.