Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


39271 / 76732 ←次へ | 前へ→

【42574】Re:特定のシート(複数)を残して削除する方法
回答  Kein  - 06/9/15(金) 11:56 -

引用なし
パスワード
   Select Case 構文を使うと、こんな感じです。

Sub 常にシートは1枚にする()
  Dim mysh As Worksheet

  For Each mysh In Sheets
    Select Case mysh.Name
     Case "test1", "test2", "test3"
     Case Else: mysh.Delete
    End Select
  Next
End Sub
0 hits

【42566】特定のシート(複数)を残して削除する方法 とく 06/9/15(金) 11:18 質問
【42572】Re:特定のシート(複数)を残して削除する... ひげくま 06/9/15(金) 11:44 回答
【42575】Re:特定のシート(複数)を残して削除する... とく 06/9/15(金) 12:00 お礼
【42574】Re:特定のシート(複数)を残して削除する... Kein 06/9/15(金) 11:56 回答
【42580】Re:特定のシート(複数)を残して削除する... とく 06/9/15(金) 14:33 お礼

39271 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free