动态添加文本

两种方法遵循以下步骤：

• 创建演示文稿。
• 添加空白幻灯片。
• 添加文本框。
• 设置文本内容。
• 保存演示文稿。

VSTO

 private void AddTextBox()
{
	//创建演示文稿
	PowerPoint.Presentation pres = Globals.ThisAddIn.Application
		.Presentations.Add(Microsoft.Office.Core.MsoTriState.msoFalse);
	//获取空白幻灯片布局
	PowerPoint.CustomLayout layout = pres.SlideMaster.
		CustomLayouts[7];
	//添加空白幻灯片
	PowerPoint.Slide sld = pres.Slides.AddSlide(1, layout);
	//添加文本框
	PowerPoint.Shape shp =sld.Shapes.AddTextbox
	(Microsoft.Office.Core.MsoTextOrientation.msoTextOrientationHorizontal,150, 100, 400, 100);
	//设置文本
	PowerPoint.TextRange txtRange = shp.TextFrame.TextRange;
	txtRange.Text = "Text added dynamically";
	txtRange.Font.Name = "Arial";
	txtRange.Font.Bold = Microsoft.Office.Core.MsoTriState.msoTrue;
	txtRange.Font.Size = 32;
	//将输出写入磁盘
	pres.SaveAs("outVSTOAddingText.ppt",
		PowerPoint.PpSaveAsFileType.ppSaveAsPresentation,
		Microsoft.Office.Core.MsoTriState.msoFalse);
}

Aspose.Slides

 static void AddTextBox()
{
	//创建演示文稿
	Presentation pres = new Presentation();
	//默认构造函数创建演示文稿时会自动添加空白幻灯片
	//因此无需再添加空白幻灯片
	Slide sld = pres.GetSlideByPosition(1);
	//获取Arial字体的索引
	//如果使用默认构造函数创建演示文稿，索引始终为0
	int arialFontIndex = 0;
	//添加文本框
	//为此我们首先添加一个矩形
	Shape shp = sld.Shapes.AddRectangle(1200, 800, 3200, 370);
	//隐藏其边框线
	shp.LineFormat.ShowLines = false;
	//然后在矩形内部添加文本框架
	TextFrame tf = shp.AddTextFrame("");
	//设置文本
	tf.Text = "Text added dynamically";
	Portion port = tf.Paragraphs[0].Portions[0];
	port.FontIndex = arialFontIndex;
	port.FontBold = true;
	port.FontHeight = 32;
	//将输出写入磁盘
	pres.Write("outAspose.ppt");
}

下载示例代码

• GitHub
• Sourceforge
• Bitbucket