Excel 刪除空值的文字方塊(物件)

如果Excel檔，因為內含多許用不到的物件，可透過按F5→特殊→物件，待全選了物件後，按Delete鍵一次刪除。

但如果該檔案中含有其它的圖案要保留，以上方法會連圖型或圖案也刪了。

如果只是要針對空白的文字方塊，可以用以下VBA來刪除，空白的文字方塊(物件)

點選要處理的工作表後，按Alt+F11，貼上以下巨集，再執行即可。

Sub 巨集2()

For Each tbox In ActiveSheet.TextBoxes

If tbox.Text = "" Then tbox.Delete

Next tbox

End Sub