第一篇：將PPT中所有文本框里的文字提取出來

將PPT中所有文本框里的文字提取出來

打開PPT，按ALT+F11打開VBA編輯器，在左面的工程視圖里點擊右鍵，選擇插入->模塊，添加一個模塊，名字都不用改。

然后點擊頂部的“工具”菜單，選擇引用，找“Microsoft Word X.0 Object Library”（其中X與你的OFFICE版本有關(guān)），鉤上，點確定

將下列代碼貼到剛建立的模塊里，按F5即可

Sub Main()

On Error Resume Next

Dim temp As New Word.Document, tmpShape As Shape, tmpSlide As Slide

For Each tmpSlide In ActivePresentation.Slides

For Each tmpShape In tmpSlide.Shapes

temp.Range().Text = temp.Range()+ tmpShape.TextFrame.TextRange.Text

Next tmpShape

Next tmpSlide

temp.Application.Visible = True

End Sub

復制以上代碼后，f5，就會打開一個word，另存為即可。

第二篇：Excel提取文件夾中的所有文件名稱

Excel提取文件夾中的所有文件名稱

1.Excel提取文件夾中的所有文件名稱

1、在那個文件夾內(nèi)新建一個.TXT文件（如wenjian.txt），用記事本單開輸入 dir> 1.txt 保存退出

將剛才的.TXT（wenjian.txt）更名為.bat文件（wenjian.bat）雙擊wenjian.bat文件運行一次，在文件夾內(nèi)多出一個1.txt文件

打開1.txt文件，將其中的內(nèi)容粘貼到Excel中，數(shù)據(jù)——分列處理就可以得到你要的文件名列表了！

2、VBA（2003版）

在那個文件夾下新建Excel文件，打開新建的Excel文件，右擊工作表標簽（如Sheet1），查看代碼——在代碼編輯器中輸入以下代碼 Sub Test()Dim i As Integer Dim strPath As String strPath = ThisWorkbook.Path With Application.FileSearch

.LookIn = strPath

.SearchSubFolders = True

.Filename = “*.*”

If.Execute > 0 Then

For i = 1 To.FoundFiles.Count

Range(“A” & i)=.FoundFiles(i)

Next i

End If End With End Sub 回到Excel表格中，工具——宏——宏——選擇Sheet1.Test——執(zhí)行 看看效果吧！

2.Excel單元格中顯示該文件夾內(nèi)的文件數(shù)量或名稱 假設(shè)這個文件夾是

D:fda

1、插入]-[名稱]-[定義]，或按CTRL+F3，打開excel→名稱管理器→定義一個名稱→比如：aaa 引用位置輸入：=FILES(“d:fda*.*”)&T(NOW())1

2、然后在任一工作表某一單元格輸入：=COUNTA(aaa)則返回文件個數(shù)。

3、如果在任一工作表某一單元格輸入： =if(row(a1)>counta(aaa),“",index(aaa,row(a1)))

4、再下拉公式進行填充，則依序填充文件名。

3.Excel一列中輸入文件名，另一列自動生成指定文件夾同名文件超鏈接

A列為輸入文件名，B列返回超鏈接

B1中輸入：=HYPERLINK(”D:FDA“&A1,A1)其中”d:fda“為指定文件夾路徑。4.Excel中怎么把行轉(zhuǎn)換成列

復制需轉(zhuǎn)換的單元格行，選擇性粘勾選“轉(zhuǎn)置”。

在頁面投置工作表選項中勾選單色打印，可以不打印底紋圖案。

5.Excel高亮顯示光標所在行或列？

在Excel中選擇菜單“格式——條件格式”命令，彈出“條件格式”對話框。

在“條件”下拉框中選擇“公式”并在右側(cè)中輸入下面相應的公式，然后點擊“格式”按鈕，設(shè)置相應的格式，完成后，按“確定”按鈕。不過當前單元格編輯過才行，按過回車。

高亮單元格：

條件格式：=CELL(”address“)=ADDRESS(ROW(),COLUMN())高亮行

條件格式：=ROW()=CELL(”row“)或者：

=CELL(”row“)=ROW()高亮行和列

條件格式：=(row()=cell(”row“))+(column()=cell(”col“))高亮當前單元格為止的相應行和列，呈反L形

條件格式：=OR(AND(CELL(”row“)=ROW(),CELL(”col“)+1>COLUMN()),AND(CELL(”col“)=COLUMN(),CELL(”row“)+1>ROW()))高亮當前單元格為止的相應行和列，呈反L形，且當前單元格背景色改變、字體加粗：

條件格式：=CELL(”address“)=ADDRESS(ROW(),COLUMN())”“=OR(AND(CELL(”row“)=ROW(),CELL(”col“)+1>COLUMN()),AND(CELL(”col“)=COLUMN(),CELL(”row“)+1>ROW()))

6.Excel單元格中插入頁碼方法（以Excel 2003版本為基礎(chǔ)，下文中所有“填寫”后跟的內(nèi)容不包括內(nèi)容最外側(cè)的全角引號）

一、定義引用項（以下定義方法通過單擊菜單“插入/名稱/定義”彈出定義對話框操作）

1、定義“頁碼”：“名稱”中填寫“頁碼”，“引用位置”中填寫“=IF(ISERROR(MATCH(ROW(),GET.DOCUMENT(64),1)),1,MATCH(ROW(),GE T.DOCUMENT(64),1)+1)”

2、定義“總頁數(shù)”：“名稱”中填寫“總頁數(shù)”，“引用位置”中填寫“=GET.DOCUMENT(50)+RAND()*0”。

3、定義“”：”：“名稱”中填寫“”，“引用位置”中填寫“=”數(shù)&“ 頁””。

二、單元格插入頁碼

1、插入法：指定單元格，單擊菜單“插入/名稱/粘貼”，根據(jù)需要的格式選擇即可。

2、輸入法：指定單元格，在上部輸入?yún)^(qū)輸入等號加上面定義的名稱，如“=”就是本例提問的格式。

三、深入探討

通過分析上述“定義引用項”內(nèi)容，您會發(fā)現(xiàn)，其實只需要定義“頁碼”和“總頁數(shù)”就可以了。需要使用的時候，可直接指定單元格，輸入上述“引用內(nèi)容”的內(nèi)容就可達成格式化頁碼的需要。如本例提問要求的格式化日期，可直接指定單元格后輸入“=“數(shù)&” 頁“”就OK了。

7.Excel隔行變色的方法 條件格式公式說明：

=MOD(ROW(),2)=0，實現(xiàn)的效果是偶數(shù)行自動填充底紋顏色 =MOD(ROW(),2)=1，實現(xiàn)的效果是奇數(shù)行自動填充底紋顏色

如果需要奇偶行都設(shè)置顏色，只需要設(shè)定兩個條件即條件1和條件2 同樣的方法，可以實現(xiàn)excel隔列變色，只需將公式中的row變?yōu)镃OLUMN 就可以了，即：=MOD(COLUMN(),2)=0 8.Excel字符替代函數(shù)

=replace(目前的文本，想從第幾個數(shù)字開始改，共需要改幾個字，用什么改）=substitute(目前的文本，需要替換的文本，新的文本（替換后））9.Excel單元格的相對引用和絕對引用 相對引用：a1=a2+a3 絕對引用：a1=a$2+$a$3 絕對引用：a1=$a2+$a$3 10.Excel公式插入回車符并顯示出來自動換行

在公式中加”&CHAR(10)&”，同時要將單元格設(shè)置為自動換行。11.Excel自動換行函數(shù)

Char(10)

^p

12.Excel單元格不顯示0和錯誤#/0的公式

=IF(or(公式=0,ISERROR(公式)),”“,公式)=IF(or(公式=0,ISERROR(公式)),”“,公式)=IF(or(公式=0,ISERROR(公式)),”“,公式)

ISNA函數(shù)用于測試數(shù)值類型，如果測試值為錯誤值#N/A，則返回TRUE，否則返回FALSE。

13.Excel單元格日期格式轉(zhuǎn)換成文本格式

如“2008年7月18日”或“2008-7-18”的日期格式轉(zhuǎn)換成“20080718”的8位文本格式。

公式“=text(A2,”yyyymmdd“)”（注：如果日期中還包含時、分、秒，則公式可改成“=text(A2,”yyyymmddhhmmss“)”。其中的文本格式可以按自己的要求靈活運用，如“yymmdd h:m:s”表示只要年份的后兩位、時間中用冒號將時分秒隔開并且不滿兩位時前面不加“0”。14.Excel函數(shù)公式返回行號、列號

返回行號：=row()返回列號：=column()15.Excel頁腳 底端標題行設(shè)置

選擇頁腳區(qū)域，按住Shift鍵，編輯—復制圖片，再把圖片插入到自定義頁腳里（2003版可以，2000沒有這個功能）。

16.Excel錄制宏執(zhí)行宏

簡單的方法：自己可練習創(chuàng)建一個“宏”，（就是錄下自已需要做的操作步驟）方法：點擊——工具——宏——錄制新宏——彈出窗口——確認宏名稱——這時就會彈出一個錄像框，你就可以一步一步點擊你要做的操作，按下“停止”，就結(jié)束了宏錄制！

你再進入工具——宏——選擇剛錄下的宏名稱——點擊“編輯”——這里面就是你要的宏代碼了，自已可以研究了！

如下面就是一個宏，執(zhí)行后會自己打開：工作表3 代碼是：

Sub 按鈕1_單擊()Sheet(Sheet3)End Sub 17.Excel打開工作薄時自動執(zhí)行宏 先錄制宏，再宏名字改成 sub auto_open 就變成自動了

18.Excel擊活工作表時自動執(zhí)行宏

Sub Macro適合行高()

………..宏名 ' ZYC錄制 時間: 2014-9-23

………….注釋行 ' Private Sub worksheet_activate()Cells(1, 1)= Now()Rows(”3:3“).Select Rows(”3:3“).EntireRow.AutoFit End Sub 先打開對應工作表，操作alt+F11，在視圖中選正代碼窗口，然后復制粘貼上面代碼。

19.Excel擊活工作表6-10行自動執(zhí)行最適合的行高，然后選正單元格A6的宏？

Private Sub worksheet_activate()

Rows(”6:10“).Select

Rows(”6:10“).EntireRow.AutoFit Range(”A6").Select End Sub 20.Excel隱藏單元格中的數(shù)據(jù)

有時候，我們可能不希望別人看到Excel某些單元格或者區(qū)域中的數(shù)據(jù)內(nèi)容，可以選定這些單元格內(nèi)容，然后按下“Ctrl+1”組合鍵，在彈出的“單元格格式”對話框中，單擊“數(shù)字”選項卡，然后選擇“自定義”分類，在其中的“類型”文本框中輸入半角符號“;;;”即可，這樣即便是修改字體顏色也無法顯示隱藏的內(nèi)容了。

21.Excel統(tǒng)計空白單元格、數(shù)字單元格、數(shù)字及非空單元格數(shù)量

=countBlank(A1:A100)'統(tǒng)計空白單元格數(shù)量 =count(A1:A100)

'統(tǒng)計數(shù)字單元格個數(shù)

=counta(A1:A100)

'統(tǒng)計數(shù)字及非空單元格個數(shù)

=countif(A1:A100,A1)

'條件統(tǒng)計 統(tǒng)計區(qū)域中A1同值的個數(shù)

第三篇：從PPT中提取的廣告策劃文本

一、廣告策劃書寫作的一般格式 ? 封面

? 廣告策劃小組成員名單 ? 目錄 ? 正文 ? 附件 ? 封底

二、廣告策劃書正文內(nèi)容 ?

一、營銷環(huán)境分析

1、企業(yè)市場營銷環(huán)境中宏觀的制約因素。

2、企業(yè)市場營銷環(huán)境中微觀的制約因素。

3、市場概況。

4、營銷環(huán)境分析總結(jié)。?

二、消費者分析

1、消費者的總體消費態(tài)勢。?

2、現(xiàn)有消費者分析。?

3、潛在消費者分析。?

4、消費者分析總結(jié)。

三、產(chǎn)品分析

1、產(chǎn)品特征分析。

2、產(chǎn)品生命周期分析。?

3、產(chǎn)品的品牌形象分析。?

4、產(chǎn)品定位分析。?

5、產(chǎn)品分析的總結(jié)。

四、企業(yè)和競爭對手的競爭狀況分析

1、企業(yè)在競爭中的地位。?

2、企業(yè)的競爭對手。

3、企業(yè)和競爭對手的比較。

五、企業(yè)和競爭對手的廣告分析

1、企業(yè)和競爭對手以往的廣告活動的? ? ? ? ? ? ?

概況。

2、企業(yè)和競爭對手以往廣告的目標市場策略。

3、企業(yè)和競爭對手的產(chǎn)品定位策略。

4、企業(yè)和競爭對手以往的廣告訴求策略。

5、企業(yè)和競爭對手以往的廣告表現(xiàn)策略。

6、企業(yè)和競爭對手以往的廣告媒介策略。

7、廣告效果。

8、總結(jié)。

第二部分：廣告策略

一、廣告的目標 ?

1、企業(yè)提出的目標。

2、根據(jù)市場情況可以達到的目標。?

3、對廣告目標的表述。?

二、目標市場策略

1、企業(yè)原有市場觀點的分析與評估。?

2、市場細分。

3、企業(yè)的目標市場策略。?

三、產(chǎn)品定位策略

1、對企業(yè)以往的定位策略的分析與評估。

2、產(chǎn)品定位策略。

四、廣告訴求策略 ?

1、廣告的訴求對象。?

2、廣告的訴求重點。?

3、訴求方法策略。?

五、廣告表現(xiàn)策略 ?

1、廣告主題策略。?

2、廣告創(chuàng)意策略。

3、廣告表現(xiàn)的其它內(nèi)容。?

六、廣告媒介策略

1、對媒介策略的總體表述。?

2、媒介的地域。?

3、媒介的類型。?

4、媒介的選擇。?

5、媒介組合策略。?

6、廣告發(fā)布時機策略。?

7、廣告發(fā)布頻率策略。

第三部分：廣告計劃

一、廣告目標 ?

二、廣告時間

1、在各目標市場的開始時間。?

2、廣告活動結(jié)束時間。?

3、廣告活動的持續(xù)時間。?

三、廣告的目標市場 ?

1、廣告的主題 ?

2、廣告的創(chuàng)意

3、各媒介的廣告表現(xiàn) ?

4、各媒介廣告的規(guī)格 ?

5、各媒介廣告的制作要求 ?

1、廣告發(fā)布的媒介 ?

2、各媒介的廣告規(guī)格 ?

3、廣告媒介的排期表 ?

八、其它活動計劃 ?

1、促銷活動計劃 ?

2、公關(guān)活動計劃 ?

3、其它活動計劃

九、廣告費用預算 ?

1、廣告策劃創(chuàng)意費用 ?

2、廣告設(shè)計費用 ?

3、廣告制作費用 ?

4、廣告媒介費用

5、其它活動所需費用 ?

6、機動費用 ?

7、費用總和 ? 第四部分：廣告活動的效果預測和監(jiān)控

一、廣告效果的預測 ?

1、廣告主題測試 ?

2、廣告創(chuàng)意測試 ?

3、廣告文案測試 ?

4、廣告作品測試 ?

二、廣告效果的監(jiān)控 ?

1、廣告媒介發(fā)布的監(jiān)控 ?

2、廣告效果的測定

? 2004年初,中山市名人通信集團決定進軍陜西手機市場.? 2004年3月12日,名人西北市場總經(jīng)理和育誠廣告首度接觸,并就名人手機陜西市場開拓進行了交流,隨后成立了項目小組,掌握部分資料后開始討論。

? 2004年3月15日,名人手機陜西市場推廣方案浮出水面

迅速拓展陜西市場 完成預定銷售目標

????? 電梯廣告費用：約5萬元

電臺廣告費用：約6萬元

活動宣傳費用：路演單場1。5萬元/會議支持略

DM制作費用： 3萬元

戶外媒體費用：白馬候車廳7.36萬元/30個14天+20萬元 ? 電視廣告費用：略 ? 費用總計： 預計40多萬元

本次提案旨在展現(xiàn)育誠的推廣思路，具體的策略執(zhí)行文本、終端銷售管理，和創(chuàng)作表現(xiàn)在隨后的執(zhí)行案中提供。

第四篇：快速導出提取PPT中的音樂、視頻及媒體文件

很多好的可以自動播放的PPT文件都有背景音樂，而設(shè)計精良的此類PPT背景音樂和內(nèi)容都搭配的天衣無縫。然而這些背景音樂一般都是純音樂，當我們制作類似風格的PPT，想用相同的音樂，是否苦于無法搜索到這個音樂，因為我們壓根不知道它的名稱。下面讓主頁君教你如何提取PPT中的音樂文件。

因?qū)PT2003，PPT2007，PPT2010版本打開文件的提取方式有區(qū)別，下面逐一介紹。

在PPT2003和PPT2007中提取方法：

①打開相應PPT文件；

②單擊“文件”——“另存為”，另存為網(wǎng)頁html文件格式；

③在保存地址里，有一個和原PPT文件名一樣的文件夾，原PPT里包含的所有多媒體文件都在里面。然后剪切復制到你的收藏夾里吧。

PPT2010中提取方法：

①右擊相應PPT文件（以文件“簡歷動畫,pptx”為例），單擊“添加到“簡歷動畫.rar“(T)”；

②打開壓縮后的壓縮文件；

③單擊“簡歷動畫.pptx”，再單擊“查看”選項；

④出現(xiàn)另一個框，雙擊打開名為“ppt”的文件夾；

⑤在出現(xiàn)的框中，單擊名為”media"的文件夾；

⑥又出現(xiàn)下一子框，里面飽含了該PPT文件所有的多媒體文件，單擊你想要的文件，按住不放，直接拖到桌面就可以了。其中音樂文件名為“media”。

第五篇：提取PPT中漂亮背景圖片的三種方法

提取PPT中漂亮背景圖片的三種方法

提取 在自己制作PPT課件過程中，經(jīng)常需要用到一些比較好的背景圖片，作為教師有必要隨 時儲備一些精美的圖片素材備用。網(wǎng)絡(luò)中圖片雖然很多，但是要找到適合做課件背景的卻不 容易，一種可行的辦法就是從現(xiàn)成PPT課件里提取背景，那么如何提取呢？下面介紹三種可 行的方法，與大家共享。

第一種： 最簡單省事，就是直接提取人家PPT課件中的背景。1.啟動PowerPoint，打開相應的演示文稿文檔。2.在非文本框和組合內(nèi)容外的空白處，單擊右鍵選擇“保存背景”，選擇適當保存位置 和對應背景圖片名稱，即完成背景圖片的保存。說明：此方法對有些PPT文件是不適用的，在非文本框和組合內(nèi)容外的空白處，單擊右 鍵時不出現(xiàn)“保存背景”命令。

第二種: 制作者需要將某個Powerpoint演示文稿中的圖片單獨提取出來，只要將其另存為網(wǎng)頁 格式即可。1.啟動PowerPoint，打開相應的演示文稿文檔。2.執(zhí)行“文件→另存為網(wǎng)頁”命令，打開“另存為網(wǎng)頁”對話框。3.將“保存類型”設(shè)置為“網(wǎng)頁（*.htm*.html），然后取名（如tp）保存返回?！?4.我們在上述網(wǎng)頁文件保存的文件夾中，會找到一個名為“tp.files”的文件夾，PPT 文件 所用的所有圖片都是單獨保存了文件夾中，包括背景圖片。

第三種: 1.先打開課件，找到你喜歡那張背景的幻燈片，然后把它上面的所有文本框等刪去，再 按幻燈片放映，放到那張背景時，按CTRL+PRINT SCREEN（全屏截?。?。2.找開“畫圖”（開始---附件）或者其它圖片處理程序，按CTRL+V（粘貼）調(diào)出截圖，另存為JPEG或GIF文件（記住位置）。3.打開新的幻燈片，右鍵單擊空白處---背景---填充效果---圖片---選擇圖片（找到剛剛保 存的那張圖片）---確定---應用。