Changer le sens du texte par défaut dans une présentation powerpoint en utilisant VBA

Question

J'utilise l'objet-modèle Powerpoint pour créer une présentation par programme dans PowerPoint 2007.

Certains des ordinateurs sur lesquels je lance mon programme PowerPoint est mis en hébreu comme Langue d'édition principale. (pour changer la langue principale, appuyez sur le bouton "Office", puis sur "Options Powerpoint", puis sélectionnez Popular-> Language Settings-> Primary Editing Language)

Sur ces ordinateurs, lorsque j'exécute mon programme, tous le texte de la présentation créée (à tort) apparaît justifié à droite et les puces apparaissent à droite du texte.

Je pourrais résoudre ce problème en modifiant le fichier ppt/presentation.xml dans le fichier PPTX de présentation résultant. J'ajuste les propriétés Alignment et RightToLeft dans les "Styles de texte par défaut" pour chaque niveau de balle. Cependant, l'édition XML n'est pas une bonne option pour ce projet.

Comment puis-je modifier la direction du texte par défaut dans une présentation à l'aide du modèle objet (c'est-à-dire, VBA), en plus de modifier chaque zone de texte individuellement?

---

Merci pour les suggestions,

Ce que j'ai essayé:

je fis Application.Presentations(1).LayoutDirection = ppDirectionLeftToRight, qui change la direction de l'interface utilisateur PowerPoint. J'ai également changé Application.Presentations(1).LanguageID en anglais américain. Malheureusement, faire ces choses n'a pas résolu le problème du texte de droite à gauche dans la présentation créée.

Donc finalement j'ai renoncé à changer les paramètres de la présentation elle-même et en effet directement changé ParagraphFormat.TextDirection et ParagraphFormat.Alignment pour chaque Run de chaque zone de texte que je initialement essayé d'éviter, et naturellement ce qui a eu l'effet désiré.

Answer 1

En C# il regardera la façon suivante:

textbox.TextFrame.TextRange.ParagraphFormat.TextDirection = PpDirection.ppDirectionRightToLeft