アプリ版：「スタンプのみでお礼する」機能のリリースについて

マジレス希望

例えば、マクロを使って(エクセル)ファイルにある sheet1、sheet2、sheet3、shee

締切済

  • 質問者：kimchh58
  • 質問日時：
  • 回答数：1件

例えば、マクロを使って(エクセル)ファイルにある
sheet1、sheet2、sheet3、sheet4の中、2017/8/9になったらsheet4だけ、削除できるようにするのは可能ですか？教えてください。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1

  • 回答者： fujillin
  • 回答日時：

こんにちは



以下を、ThisWorkbookモジュールへでいかがでしょうか？
Private Sub Workbook_Open()

If Date >= #8/9/2017# Then
　For Each w In Worksheets
　　If w.Name = "Sheet4" Then
　　　Application.DisplayAlerts = False
　　　w.Delete
　　　ThisWorkbook.Save
　　　Application.DisplayAlerts = True
　　　Exit Sub
　　End If
　Next w
End If

End Sub
    • good
    • 3
    • 件
通報する
この回答へのお礼

やってみます

ありがとうございます！

通報する
お礼日時：2017/08/08 23:46

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

ページトップページトップ

Q質問する（無料）

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報