【求助】詢問如何刪除物件但不要刪除到VBA的按鈕

david1216jp

各位前輩們好，先行提供檔案如下，
對帳單.rar (102.75 KB)

下載次數: 5

2019-5-21 21:14

檔案中我有爬文寫了一個巨集DeleteAll，
但是執行之後都會把我在旁邊放置的按鈕同時刪除掉(似乎不能用shapes)，
請問是否有方法可以改寫，把檔案中Forms.HTML:Text與Forms.HTML:Checkbox都刪除掉，
然後不會動到旁邊的按鈕，還向各位高手求助，感謝~~

jeffrey628litw

回復 1# david1216jp


    建議用籃底白字那種按鈕就不會被 VBA 程式刪除掉 VBA 按紐。

下載 (28.39 KB)

2019-5-22 13:27

VBA - 設多條件從資料庫中撈出結果(常用).rar (14.19 KB)

下載次數: 8

2019-5-22 13:28

david1216jp

感謝您協助提供意見，我剛剛想到解決的方法，已解決問題，再次感謝~~
對帳單.zip (104.67 KB)

下載次數: 3

2019-5-22 15:31

1. Sub DeleteAll()
   
2. 
   
3. Application.ScreenUpdating = False
   
4. 
   
5. Dim shp As OLEObject
   
6. 
   
7. Columns("A:R").Select
   
8. Selection.Delete Shift:=xlToLeft
   
9. 
   
10. For Each shp In ActiveSheet.OLEObjects
    
11.    shp.Delete
    
12. Next shp
    
13. 
    
14. Range("A1").Select
    
15. 
    
16. Application.ScreenUpdating = True
    
17. 
    
18. End Sub

複製代碼