使用Add-in向选中的Slide插入文字

来源：互联网发布：正规淘宝网上兼职编辑：程序博客网时间：2024/06/10 01:04

这是一个在PowerPoint中创建一个Ribbon按钮，当点击这个按钮时会向当前Slide插入一段文字。

using System;using System.Collections.Generic;using System.Linq;using System.Text;using Microsoft.Office.Tools.Ribbon;using PowerPoint = Microsoft.Office.Interop.PowerPoint;using System.Windows.Forms;using Office = Microsoft.Office.Core;namespace PowerPointAddIn2{    public partial class Ribbon1    {        private void Ribbon1_Load(object sender, RibbonUIEventArgs e)        {        }        private void button1_Click(object sender, RibbonControlEventArgs e)        {            PowerPoint.Application ppApp = Globals.ThisAddIn.Application;            PowerPoint.SlideRange ppSR = ppApp.ActiveWindow.Selection                .SlideRange;            PowerPoint.Shape ppShap = ppSR.Shapes                .AddLabel(Office.MsoTextOrientation                .msoTextOrientationHorizontal, 0, 0, 200, 25);            ppShap.TextEffect.Text = "Hello World!";        }    }}