Помогите с VB в Power Point!!

Как мне написать макрос, чтобы абсолютно все шрифты во всех диаграммах на слайде становились Arial, размер 10, обычный?