[VBA ] 定義需刪除的 Sheet List Name 作刪除

看板Visual_Basic作者 (香桃木)時間14年前 (2011/11/11 23:34), 編輯推噓0(002)
留言2則, 1人參與, 最新討論串1/1
請教版上 我想在sheet1裡作一個CommandButton可以自動刪除sheet.name 但sheet.name的name是一個List 我想定義在sheet2的儲存格內 可能是sheet2.range("A:A") 我該怎麼跑這個迴圈去Check目前所有的sheets 有哪些是符合我的List而必須要刪除的呢~感謝各位 目前是可以寫出指定"abc" 但不想寫死~List越長越多要一直改程式內容 Dim sheet As Worksheet Application.DisplayAlerts = False For Each sheet In Worksheets If (sheet.Name = "abc") Then sheet.Delete End If Next Application.DisplayAlerts = True Next 麻煩各位了~~~~~~~冏 感謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.168.83.67

11/14 11:19, , 1F
對A欄執行While迴圈, 如果為空就停止. 如果Sheet.Name等於A欄
11/14 11:19, 1F

11/14 11:19, , 2F
任一的值, 就執行Sheet.Delete並跳出While
11/14 11:19, 2F
文章代碼(AID): #1ElK26dM (Visual_Basic)