C#實(shí)現(xiàn)操作PPT動畫窗格并插入音頻文件

更新時間：2023年10月24日 09:45:16 作者：初九之潛龍勿用

這篇文章主要為大家詳細(xì)介紹了如何利用C#實(shí)現(xiàn)操作PPT動畫窗格并插入音頻文件,文中的示例代碼講解詳細(xì),感興趣的小伙伴可以跟隨小編一起學(xué)習(xí)一下

系統(tǒng)環(huán)境

在 Windows Server 2019 操作系統(tǒng)上安裝Office PowerPoint 2016或以上

安裝 .netFramework4.7.1以上

開發(fā)工具 VS2019 語言 C#

基礎(chǔ)配置

打開控制面板、管理工具、組件服務(wù)：

點(diǎn)擊組件服務(wù)、計(jì)算機(jī)、我的電腦、DCOM配置

找到Microsoft PowerPoint應(yīng)用程序

選擇屬性、打開標(biāo)識選項(xiàng)卡、選擇下列用戶選項(xiàng)，設(shè)置啟動PPT應(yīng)用的用戶，點(diǎn)確定即可。

設(shè)計(jì)想法

由用戶設(shè)計(jì)PPT及每頁的動畫效果，并以此為模板，與給定的一組音頻文件，通過程序控制進(jìn)行二次合成，插入的依據(jù)則是根據(jù)提供的動畫標(biāo)題進(jìn)行搜索定位（標(biāo)題可以模糊搜索）。這個設(shè)計(jì)想法可以參考文末補(bǔ)充內(nèi)容

我們假設(shè)如下圖，要在兩組動畫效果中，執(zhí)行完成一個動畫效果后插入一段音頻講解詞，動畫效果的標(biāo)題為：

（1）組合6：對應(yīng)插入P5_01.MP3講解詞。

（1）組合30：對應(yīng)插入P5_02.MP3講解詞。

那么設(shè)計(jì)原理，就是遍歷動畫窗格的動畫效果對象，記錄對象的持續(xù)時間和延遲時間，插入音頻后，則下一個動畫效果的延遲時間根據(jù)上一動畫效果對象的時間和音頻的時間累積進(jìn)行計(jì)算，并更改動畫效果的開始條件，如下圖：

如圖，下一個動畫效果對象的延遲時間重新計(jì)算，是根據(jù)“組合6" 和 "P5_01" 的時間進(jìn)行累積計(jì)算得到的，以此類推。

關(guān)鍵代碼

組件庫引入

基礎(chǔ)代碼

//創(chuàng)建PPT應(yīng)用程序            
    POWERPOINT.Application objApp = new POWERPOINT.Application();
    POWERPOINT.Presentation objPresSet = null;
 
// 不顯示彈出警告等，最小化窗口應(yīng)用
    objApp.DisplayAlerts = POWERPOINT.PpAlertLevel.ppAlertsNone;
    objApp.WindowState = POWERPOINT.PpWindowState.ppWindowMinimized;
    
//打開文件，假設(shè)模板文件名為m1.pptx
    objPresSet = objApp.Presentations.Open("m1.pptx", Microsoft.Office.Core.MsoTriState.msoFalse, Microsoft.Office.Core.MsoTriState.msoFalse, Microsoft.Office.Core.MsoTriState.msoFalse);
 
//創(chuàng)建查找字典
    Dictionary<string, string> Medias = new Dictionary<string, string>();
    Medias.Add("組合6","P5_01.MP3");
    Medias.Add("組合30", "P5_02.MP3");

核心代碼

//遍歷所有的幻燈片對象            
for (int i = 1; i <= objPresSet.Slides.Count; i++)
{
    POWERPOINT.Slide slide = objPresSet.Slides[i];   //獲取當(dāng)前幻燈片對象
    if (slide.TimeLine.MainSequence.Count == 0) continue;  //如果該頁沒有動畫效果則短路
    ...
}
//按提供的字典進(jìn)行查找 
foreach (string[] pros in Medias)
{
    string f_likecaption = pros[0];  //要查找的動畫標(biāo)題
    mediafile = pros[1];             //對應(yīng)要添加的MP3文件地址
    POWERPOINT.Shape wave=null;      //初始化一個聲音變量，在PPT里也是一個Shape對象
    //遍歷該頁動畫效果
    for (int j = 1; j <= slide.TimeLine.MainSequence.Count; j++)
    {
      POWERPOINT.Effect effect = slide.TimeLine.MainSequence[j];
       //如果查找到動畫標(biāo)題，則添加對應(yīng)的聲音文件
      if (((effect.Shape.Name + ":" + effect.DisplayName).IndexOf(f_likecaption.Trim()) != -1
      {
         wave = slide.Shapes.AddMediaObject2(mediafile);  //添加聲音文件方法
         int  singleWaveLen = wave.MediaFormat.Length;    //記錄聲音的長度
         wave.Left = 60;                                  //shape對象的位置
         wave.AnimationSettings.Animate = Microsoft.Office.Core.MsoTriState.msoTrue; //設(shè)置該對象要成為動畫
         wave.AnimationSettings.PlaySettings.PlayOnEntry = Microsoft.Office.Core.MsoTriState.msoTrue; //設(shè)置為允許自動播放
         wave.AnimationSettings.PlaySettings.HideWhileNotPlaying = Microsoft.Office.Core.MsoTriState.msoTrue; //設(shè)置播放期間是隱藏狀態(tài)
         wave.AnimationSettings.AdvanceMode = POWERPOINT.PpAdvanceMode.ppAdvanceOnTime;//設(shè)置與上一動畫同時
         wave.AnimationSettings.AnimationOrder = slide.TimeLine.MainSequence.Count;
//shape對象的索引位置，默認(rèn)為最后一個，這個要根據(jù)業(yè)務(wù)邏輯進(jìn)行調(diào)整 
         break;
      }
     }//for
    ..............
}//foreach pros
//其它關(guān)鍵屬性 
POWERPOINT.Effect effect ;
effect.Timing.Duration  //返回或設(shè)置以秒為單位的動畫長度
float WaveLen = float.Parse((singleWaveLen / 1000.0).ToString()); //聲音長度需要換算成秒

這些代碼我們提供了一些操作PPT相關(guān)的關(guān)鍵方法、屬性，我們需要根據(jù)實(shí)際的業(yè)務(wù)情況進(jìn)行修改，這里僅作參考。