一次性刪除PPT中所有動畫效果教程
在PPT中添加插入了很多動畫效果,想要一個一個刪除未免太過麻煩了,我們在這裏使用一些代碼技巧來批量刪除PPT中所有動畫,不懂的朋友們一起來學學。
通過PPT軟件中的來解決了,幾乎搜遍了所有的網站,最後終於找到了答案,將代碼給各位分享。
代碼如下:
Sub removeALL()
Dim I As Integer: Dim J As Integer
Dim oActivePres As Object
Set oActivePres = ActivePresentation
With oActivePres
For I = 1 To t
If Val(ion) < 10 Then
For J = 1 To es(I)t
es(I)es(J)ate = msoFalse
Next J
Else
For J = es(I)t To 1 Step -1
es(I)Sequence(J)te
Next J
End If
Next I
End With
Set oActivePres = Nothing
End Sub
另附方法二:
在PPT放映設置時把PPT設為“播放時不帶動畫”就可以達到同樣效果。
-
(薦)PPT模板15篇
PPT模板120xx年度已經過去一半,在這半年的時間中我通過努力的工作,也有了一點收穫,跨過年中,我感覺有必要對自己的工作做一下總結。目的在於吸取教訓,提高自己,以至於把工作做的更好,自己有信心也有決心把下半年的工作做的更好。下面我對上半年及六月份的工作進行簡要...
-
電腦-word不讓網址自動變鏈接
word不讓網址自動變鏈接Word中的自動套用格式,確實給我們帶來了很大的方便,但有時也挺煩人的,在不該用的時候它也總是固執地套用。比如有時為了文檔外觀上的考慮,不想讓Word自動將網址、E-mail地址等變成帶下劃線的鏈接方式,可在“自動-自動更正選項”對話框中,點擊...
-
學習word心得體會
當在某些事情上我們有很深的體會時,應該馬上記錄下來,寫一篇心得體會,這樣能夠培養人思考的習慣。那麼寫心得體會要注意的內容有什麼呢?下面是小編為大家整理的學習word心得體會,歡迎閲讀與收藏。學習word心得體會1計算機實訓在不知不覺中就結束了,我感覺自己還有好...
-
word2007文字底紋簡單設置的教程
接下來,我們主要用到底紋中的“圖案底紋”設置,小編就拿個實例來進行演示一遍吧!操作步驟1、啟動Word2007,打開一份文檔方便給大家演示,鼠標左鍵按住不放,選中某個段落,單擊開始選項卡下的邊框線按鈕,從下拉菜單中選擇“邊框和底紋”。2、彈出邊框和底紋對話框,切換到...