Lekce 13 - Kontingenční tabulky ve VBA pro Excel 3

V minulé lekci, Kontingenční tabulky ve VBA pro Excel 2.část, jsme se naučili filtrovat data, měnit řídící a datová pole, měnit zdroje dat v kontingenční tabulce.

V předchozích kapitolách o kontingenčních tabulkách jsme se zabývali především prací s daty. Dnes bude těžiště práce ve změnách vzhledu, stylu a uspořádání tabulky. Také probereme další vlastnosti těchto tabulek, na které jinde nebyl prostor.

Styly kontingenční tabulky

Podobně jako u jiných druhů tabulek, můžeme i v tomto případě vytvářet podobu každé tabulky odděleně, nebo si vytvořit styl, který budeme následně používat.

V Excelu je dosti vestavěných stylů, které umožňují kvalitní vzhled tabulek získat s minimální námahou.

Vestavěné styly tabulek, přesněji jejich názvy, lze získat výpisem do okna Immediate klasickým způsobem:

Public Sub subStyl11()
'výpis stylů pro Pivot
Dim vS As Excel.TableStyle
    For Each vS In ActiveWorkbook.TableStyles
'v následující podmínce vybereme pouze styly určené pro kontingenční tabulky
        If vS.Name Like "Pivot*" Then Debug.Print vS.Name
    Next vS
End Sub

...konec náhledu článku...
Pokračuj dál