Aplicar formatação de fonte ao texto do PowerPoint programaticamente

Estou tentando usar o VBA para inserir algum texto em um PowerPointTextRange, Eu uso algo assim: ActiveWindow.Selection.SlideRange.Shapes("rec1").TextFrame.TextRange.Text = "Hi" No entanto, não consigo descobrir como aplicar negrito, itálico e ...