Re: [文件] 取代文字方塊

[soyoso (Amon)]

用巨集會比較易完成
alt+F11開啟
接著「插入」→「模組」

貼入以下程式碼

Dim alltextbox As Shape
    For Each alltextbox In ActiveDocument.Shapes
        If alltextbox.Type = msoTextBox Then alltextbox.Delete
    Next
End Sub

按F5執行就ok了

※ 引述《b8888 (b8888)》之銘言：
: 軟體:word
: 版本:2003,2007
: 請問各位大大如何在word文件中找到所有的文字方塊
: 然後全部刪除,
: 謝謝您的回答

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 114.39.161.115
推 kan2001kimo:偉哉！
推 b8888:謝謝您的回答