Jak definovat počet listů aplikace Excel pomocí makra
Mnoho maker slouží k automatickému vytváření sešitů. Tyto složky by pak obvykle měly mít také určitý počet pracovních listů.
Pomocí následujícího příkazu můžete požadovaný počet listů ovládat pomocí makra:
Definujte dílčí počet listů ()
Application.SheetsInNewWorkbook = 5
End Sub
Pomocí čísla za znaménkem rovnosti určete, kolik listů by mělo být ve vašem sešitu. Tato hodnota je shodná s číslem, které může uživatel nastavit prostřednictvím nabídky „Nástroje - Možnosti - Obecné“ v poli „Listy sešitu“, jak je vidět na následujícím obrázku:
Hodnotu si samozřejmě můžete také přečíst. To je užitečné, pokud chcete pouze krátce změnit počet listů, abyste poté vytvořili složku s přesně tímto počtem listů. Následující program ukazuje, jak to provést:
- Uloží aktuálně přednastavený počet listů do proměnné.
- Nastaví hodnotu na číslo 7.
- Vytvoří nový sešit (který pak obsahuje sedm listů).
- Resetuje přednastavený počet tabulek na dříve uloženou hodnotu.
Zde je seznam příslušných programů pro tento úkol:
Číslo dílčí tabulky Značka ()
Dim číslo jako celé číslo
Číslo = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 7
Sešity. Přidat
Application.SheetsInNewWorkbook = číslo
End Sub