Word 轉(zhuǎn)換為PPT，也許你很容易做到，但是反之把PPT轉(zhuǎn)換為Word你知道嗎?我之前一直用一個(gè)很笨的方法，就是把里面的文字一段一段粘出來(lái)。文字少了還好說(shuō)，要是文字多了，那個(gè)工作量就可想而知了......

PowerPoint 2003 中的轉(zhuǎn)換

大家可能最為常用的是下面這種方法：(在Microsoft Office PowerPoint 2003版)

1、首先打開(kāi)需要轉(zhuǎn)換成中文Word文件的中文PowerPoint文件，然后鼠標(biāo)左鍵依次選擇“文件→發(fā)送→Microsoft Word”命令項(xiàng)。

PowerPoint 2003

2.完成選擇之后，系統(tǒng)首先會(huì)出現(xiàn)“撰寫”對(duì)話框，此時(shí)應(yīng)當(dāng)在“在Microsoft Word使用的版式”欄中選擇一種版面的配置，然后在“將幻燈片添加到Microsoft Word文檔”欄中選擇將中文PowerPoint的幻燈片轉(zhuǎn)換到中文Word文件時(shí)的變化方式。

3.完成上述選擇之后，接著使用鼠標(biāo)左鍵單擊“確定”按鈕，即可啟動(dòng)中文Word，然后自動(dòng)實(shí)現(xiàn)將中文PowerPoint文件轉(zhuǎn)換到中文Word文件中，此時(shí)只需要在中文Word中稍微進(jìn)行一些修改，即可完成轉(zhuǎn)換工作。

但是經(jīng)過(guò)我多次試用，其轉(zhuǎn)換效果是相當(dāng)?shù)牟涣钊藵M意。

PowerPoint 2007 中的轉(zhuǎn)換

在Microsoft Office PowerPoint 2007版中，這個(gè)功能依然沒(méi)有得到改善。只是在“發(fā)送”里面卻找不到Microsoft Word命令項(xiàng)了。

PowerPoint 2007中的“發(fā)送”沒(méi)有了轉(zhuǎn)換為Word 的選項(xiàng)

微軟Office 2007 的最大的失敗就是對(duì)界面的改變，他幾乎完全顛覆了我們使用多年的習(xí)慣，但是當(dāng)你逐步了解了之后卻又發(fā)現(xiàn)，根本沒(méi)有實(shí)質(zhì)性的改變，這也是為什么更多的網(wǎng)友不愿意接受Office 2007的理由之一。

Microsoft Word命令項(xiàng)的確被轉(zhuǎn)移了地方，點(diǎn)擊“發(fā)布”——點(diǎn)擊“使用Microsoft Office Word創(chuàng)建講義”菜單。

發(fā)布中的創(chuàng)建Word 講義

看到了什么?一個(gè)完全與PowerPoint 2003一樣的對(duì)話框，甚至沒(méi)有任何修飾，那么這個(gè)能實(shí)現(xiàn)PPT到Word 的轉(zhuǎn)換嗎?顯然他與PowerPoint 2003 轉(zhuǎn)換的效果是一樣的，也以為著這一功能沒(méi)有得到任何提升。同樣是微軟的辦公平臺(tái)，在互換上怎么就這么難?

與2003版沒(méi)有任何變化

一般細(xì)心的用戶可能會(huì)在制作PPT的時(shí)候，首先使用Word創(chuàng)建文檔，一式兩份，這樣以備不時(shí)之需，看來(lái)也是懼怕萬(wàn)一有人需要Word 文檔，你再整理可能就會(huì)抓瞎。

說(shuō)了這么多，究竟有沒(méi)有什么方法能夠完美將PPT轉(zhuǎn)換為Word文檔?我只能遺憾的告訴你，目前還真是沒(méi)有什么完美解決方案。所謂的完美，當(dāng)然是轉(zhuǎn)換的文檔你幾乎不用修改就能使用。

雖然我說(shuō)了上面的話，你也用不著馬上離開(kāi)，絕不意味著下面的方法對(duì)你沒(méi)有任何作用!而這種方法恰恰是最簡(jiǎn)單的，也是最行之有效的方法，不信請(qǐng)繼續(xù)往下看。

 

應(yīng)用程序完美轉(zhuǎn)換PPT 到Word 文檔

說(shuō)起來(lái)很簡(jiǎn)單，就是你把下面這段代碼文字復(fù)制到Windows 文本中，將文件保存為 .vbs生成一個(gè)可執(zhí)行程序。保存在任何一個(gè)地方，比如桌面。這段代碼也是我在無(wú)意中發(fā)現(xiàn)的，但使用后感覺(jué)已經(jīng)很好，并且簡(jiǎn)單。

'綁定到本地計(jì)算機(jī) strComputer = "." '如果發(fā)生錯(cuò)誤，繼續(xù)執(zhí)行 on error resume next Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") msgbox "此腳本可以批量將ppt文件中的文本轉(zhuǎn)換為word文件。圖片、表格等內(nèi)容則自動(dòng)跳過(guò)" & vbcrlf & "使用時(shí)請(qǐng)把所有要轉(zhuǎn)換的ppt文件復(fù)制到目錄c:\下。雙擊運(yùn)行此文件即可。" & vbcrlf & "運(yùn)行此腳本需要本機(jī)上安裝了office" '創(chuàng)建一個(gè)word對(duì)象 Set objWord = CreateObject("Word.Application") '創(chuàng)建一個(gè)ppt對(duì)象 Set pptApp = CreateObject("PowerPoint.application") '獲得c:\目錄下的文件集合 Set FileList = objWMIService.ExecQuery _ ("ASSOCIATORS OF {Win32_Directory.Name='c:'} Where " _ & "ResultClass = CIM_DataFile") For Each objFile In FileList '如果文件的擴(kuò)展名是ppt If objFile.Extension = "ppt" Then pptApp.visible = true '打開(kāi)這個(gè)ppt文件 Set pptSelection = pptApp.Presentations.Open("c:\" & objFile.FileName & "." & objFile.Extension) '如果想讓腳本處理得快些，把下面一行改為“objWord.Visible = false”,不推薦。 objWord.Visible = true '新建一個(gè)word，以保存ppt中的文本 Set objDoc = objWord.Documents.Add() Set objSelection = objWord.Selection '從ppt的第一頁(yè)開(kāi)始循環(huán)。Slides.Count即幻燈片的數(shù)量 For i = 1 To pptSelection.Slides.Count '從每一張ppt的第一個(gè)文本框開(kāi)始循環(huán)，Shapes.Count，即每張幻燈片中文本框的數(shù)量 For j = 1 To pptSelection.Slides(i).Shapes.Count '如果是每頁(yè)的第一行，就按標(biāo)題處理，變成黑體字 if i =1 then objSelection.Font.Name = "黑體" '把文本框中的文字添加到word中 objSelection.TypeText pptSelection.Slides(i).Shapes(j).TextFrame.TextRange.text objSelection.TypeParagraph() objSelection.Font.Name = "宋體" end if objSelection.TypeText pptSelection.Slides(i).Shapes(j).TextFrame.TextRange.text '加一個(gè)回車 objSelection.TypeText vbcrlf Next next '關(guān)閉這個(gè)ppt文件 pptSelection.close '保存word文件。 objDoc.SaveAs("c:\" & objFile.FileName & ".doc") '如果不需要關(guān)閉word，把下面這一行刪掉 objDoc.close '如果不想彈出消息框，把下面這一行刪掉 msgbox "轉(zhuǎn)換后的word已保存在c:\" & objFile.FileName & ".doc" else '沒(méi)有ppt文件 'msgbox "錯(cuò)誤：c:\下沒(méi)有發(fā)現(xiàn)ppt文件！" End If Next pptApp.quit

怎樣使用程序?qū)�PPT轉(zhuǎn)換為Word 文檔?

將你需要轉(zhuǎn)換的PPT文檔放到C:\ 的根目錄下，雙擊我們剛才生成的 .vbs 程序，彈出下面的對(duì)話框，點(diǎn)擊“確定”。

之后稍等片刻(根據(jù)PPT 文檔的大小可能等待的時(shí)間有所區(qū)別)。就會(huì)自動(dòng)打開(kāi)一個(gè)已經(jīng)生成的Word 文檔，怎么樣，你看到了什么?轉(zhuǎn)換完成，彈出下面的對(duì)話框，點(diǎn)擊確定后收工。

這個(gè)程序無(wú)需安裝，直接運(yùn)行，文件也小。在轉(zhuǎn)換前最好將之前打開(kāi)的Word 和PowerPoint程序關(guān)閉。

由于本程序轉(zhuǎn)換后的Word文檔中文字順序并未排版，因此尚需用戶自行調(diào)整。但是這已經(jīng)讓我們事半功倍了。