如何从 C# 更改 PowerPoint 中 TextRange 的字体颜色？

Question

我使用 C# 创建了一个 PowerPoint 演示文稿：

PowerPoint.Application powerpointApplication;
PowerPoint.Presentation pptPresentation;
PowerPoint.Slide Slide;

// Create an instance of PowerPoint.
powerpointApplication = new PowerPoint.ApplicationClass();

// Create a PowerPoint presentation.
pptPresentation = powerpointApplication.Presentations.Add(
Microsoft.Office.Core.MsoTriState.msoTrue);


// Create empty slide
Slide = pptPresentation.Slides.Add(1, PowerPoint.PpSlideLayout.ppLayoutBlank);

TextRange objTextRng = objSlide.Shapes[1].TextFrame.TextRange;
objTextRng.Text = "Remote sensing calendar 1";
objTextRng.Font.Name = "Comic Sans MS";
objTextRng.Font.Size = 48;
// TODO: change color
// objTextRng.Font.Color 



// Save presentation
pptPresentation.SaveAs( BasePath + "result\\2_example.ppt", 
                       PowerPoint.PpSaveAsFileType.ppSaveAsDefault, 
                       MsoTriState.msoTrue // TODO: что за параметр???
                      );
pptPresentation.Close();

现在，如何更改 objTextRng 的字体颜色？

Answer 1

以下代码将字体颜色设置为红色：

objTextRng.Font.Color.RGB = Color.Red.ToArgb();

如果要指定不同的颜色，可以使用其他颜色之一 预定义颜色，或使用指定您自己的 RGB 值Color.FromArgb 方法。

无论哪种方式，请确保调用 ToArgb 方法 您使用的 Color 对象上。 RGB 属性要求指定 RGB 颜色值。

Answer 2

将此用于 PPTX 2007

    private int BGR(Color color)
    {
        // PowerPoint's color codes seem to be reversed (i.e., BGR) not RGB
        //      0x0000FF    produces RED not BLUE
        //      0xFF0000    produces BLUE not RED
        // so we have to produce the color "in reverse"

        int iColor = color.R + 0xFF * color.G + 0xFFFF * color.B;

        return iColor;
    }

例如，

    shape.TextFrame.TextRange.Font.Color.RGB = BGR(Color.Red);  

Answer 3

我认为此 MSDN 页面对此进行了解释。

编辑：
但这仅解释了如何在 VBScript 中执行此操作。您可以看到 TextRange 对象有一个属性 Font。这将返回 此处描述的 Font 对象资源显示您可以访问 RGB 属性。你可以像科迪告诉你的那样设置它。如果您需要更多信息，请参阅我刚刚指出的 MSDN 部分。

Answer 4

objTextRng.Font.Color.RGB = System.Drawing.ColorTranslator.ToOl(System.Drawing.Color.Blue);