公開：14.12.25

'特定シート以外すべて削除
Dim tempSheet As Worksheet
With Application
    .DisplayAlerts = False
    For Each tempSheet In Worksheets
        If tempSheet.Name <> "設定" _
        And Not tempSheet.Name Like "【重要】*" _
        Then tempSheet.Delete
    Next
    .DisplayAlerts = True
End With

---

• 学習帳
• vba

---

関連記事

1. VBAで図形を最前面や最背面に移動する
2. Excel VBAでシートをPDFとして出力
3. VBAでセルの結合と解除

---

スポンサーリンク

---