要使用宏批量刪除:
在Ppt中,首先選擇要刪除內(nèi)容的位置(新建-復(fù)制下一個代碼-運(yùn)行宏)。
Sub Test()
Dim oSlide As Slide、oShape As Shape
Dim mywidth as single、my height as single、mytop as single和my left as single
On Error Resume Next
If Ac 1 Then
If Err。Number 0 Then
Msgbox' none' vbcrlf' choose one '、VB exclamation vbokonly
Err。Clear
Exit Sub
End If
msgbox ' choose exceed 1 ' vbc rlf ' choose one ',VB exclamation vbokonly
Exit Sub
End If
Set oShape=Ac(1)
MyTop=oS
MyLeft=oS
MyHeight=oS
MyWidth=oS
For Each oSlide In Ac
For Each oShape In oSlide。Shapes
If ABS (mytop-OS) 1和my left-OS(ABS)1和my height-OS(ABS)1和my width-OS(ABS)1 then
操作系統(tǒng)
End If
next
next
End Sub
1.《【多張ppt圖片怎么刪除】巨集會在PPT中批次刪除每頁相同位置(插圖文字等)的內(nèi)容?!吩曰ヂ?lián)網(wǎng),旨在傳遞更多網(wǎng)絡(luò)信息知識,僅代表作者本人觀點(diǎn),與本網(wǎng)站無關(guān),侵刪請聯(lián)系頁腳下方聯(lián)系方式。
2.《【多張ppt圖片怎么刪除】巨集會在PPT中批次刪除每頁相同位置(插圖文字等)的內(nèi)容。》僅供讀者參考,本網(wǎng)站未對該內(nèi)容進(jìn)行證實,對其原創(chuàng)性、真實性、完整性、及時性不作任何保證。
3.文章轉(zhuǎn)載時請保留本站內(nèi)容來源地址,http://f99ss.com/keji/2503483.html