返回列表 上一主題 發帖

[發問] 好奇,刪不掉的空sheets程式窗

[發問] 好奇,刪不掉的空sheets程式窗

本帖最後由 ui123 於 2017-8-31 13:46 編輯

各位有遇過這個問題嗎? 我刪掉sheet後 ,VBA 程式窗卻留下一堆空sheet,有看到之前一篇(http://forum.twbts.com/viewthread.php?tid=4369),但是找不到"編輯>到>特殊>物件---->確定"
不知道要怎麼用巨集刪掉,或我原本刪sheet的程式可以直接刪除

原本刪sheet的程式如下:

    Dim xWs As Worksheet
    For Each xWs In Application.ActiveWorkbook.Worksheets
        If  xWs.Name <> "Template" And xWs.Name <> "Template journal"  Then
            xWs.Delete
        End If
    Next
javascript:;

javascript:;

qqq.JPG (33.37 KB)

刪不掉的sheet

qqq.JPG

old.JPG (26.51 KB)

找不到

old.JPG

不給我刪
javascript:;

nodelete.JPG (15.33 KB)

nodelete.JPG

TOP

回復 3# GBKEE

超級版主GBKEE,謝謝您的回答
這就是我刪不掉的VBA空sheet檔案...."好多個空sheet在VBA專案裡",好怪,完全沒作用,但我沒辦法刪除,而且隨者我跑巨集越來越多,好恐怖啊~
有辦法刪掉嗎? 用巨集迴圈控制物件去刪,多謝指點明燈 :dizzy:

javascript:;
javascript:;

圖片 1.jpg (59.17 KB)

WantdeleteVBAsheets

圖片 1.jpg

圖片 1.jpg (59.17 KB)

圖片 1.jpg

WantdeleteVBAsheets.zip (36.42 KB)

WantdeleteVBAsheets

TOP

回復 3# GBKEE


    好恐怖........

javascript:;

圖片 2.jpg (19.2 KB)

圖片 2.jpg

TOP

回復 6# HUNGCHILIN

HUNGCHILIN大大,感謝您
今天試了一下,只能把excel裡的巨集都刪掉連模組一起刪掉後存檔,儲存後重開就會消失,
似乎無法直接用程式刪掉

TOP

        靜思自在 : 稻穗結得越飽滿,越會往下垂,一個人越有成就,就要越有謙沖的胸襟。
返回列表 上一主題