過去ログ

                                Page     806
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼毎月アクセスできる期間を限定するには?  hana 03/2/26(水) 17:38
   ┗Re:毎月アクセスできる期間を限定するには?  かず 03/2/26(水) 17:56
      ┗Re:毎月アクセスできる期間を限定するには...  hana 03/2/27(木) 11:33
         ┗Re:毎月アクセスできる期間を限定するには...  Jaka 03/2/27(木) 12:18
            ┗Re:毎月アクセスできる期間を限定するには...  かず 03/2/27(木) 13:07
               ┗Re:毎月アクセスできる期間を限定するには...  hana 03/2/27(木) 13:30

 ───────────────────────────────────────
 ■題名 : 毎月アクセスできる期間を限定するには?
 ■名前 : hana
 ■日付 : 03/2/26(水) 17:38
 -------------------------------------------------------------------------
   こんにちは!またまたお願い致します。。

例えば毎月10日から20日の間だけそのファイル(シートでも可)にアクセス
できるように規制できますか?期限が切れたら開かない、とか書き込めない、
とか方法は今の所何でも良いのですが、毎月期日が来たら修正できないよう
にし、また次の月の開始日には書き込める形にしたいのです。但し、期日後
も他のファイルからはアクセスしてデータを読んだり(コピー&ペーストとか)
したいのですが・・。
 ───────────────────────────────────────  ■題名 : Re:毎月アクセスできる期間を限定するには?  ■名前 : かず  ■日付 : 03/2/26(水) 17:56  -------------------------------------------------------------------------
   「アクセス制御したいファイル」がエクセルのブックですよね?
であれば、以下のコードをThisWorkbookに記述するというのはどうでしょう。

Private Sub Workbook_Open()

UseDt = Day(Date)
If UseDt < 10 Or UseDt > 21 Then
 MsgBox "毎月10日から20日の間以外はこのブックを開く事は出来ません。"
 ThisWorkbook.Close
End If

End Sub
 ───────────────────────────────────────  ■題名 : Re:毎月アクセスできる期間を限定するには...  ■名前 : hana  ■日付 : 03/2/27(木) 11:33  -------------------------------------------------------------------------
   かず さん
早速ありがとうございます!ただ今は27日ということで試しに設定したら開けなく
なってしまい、修正ができなくなってしまいました。一応元ファイルは取っておいた
ので大丈夫なのですが今後修正の際に回避する方法はありますか?マクロを無効化
すれば、とも思ったのですが、バージョン97でよくわかりませんでした・・。
 ───────────────────────────────────────  ■題名 : Re:毎月アクセスできる期間を限定するには...  ■名前 : Jaka  ■日付 : 03/2/27(木) 12:18  -------------------------------------------------------------------------
   ▼hana さん:
>かず さん
>早速ありがとうございます!ただ今は27日ということで試しに設定したら開けなく
>なってしまい、修正ができなくなってしまいました。

こんにちは。
マクロを無効にすれば開けますよ。
 ───────────────────────────────────────  ■題名 : Re:毎月アクセスできる期間を限定するには...  ■名前 : かず  ■日付 : 03/2/27(木) 13:07  -------------------------------------------------------------------------
   >こんにちは。
>マクロを無効にすれば開けますよ。

Jakaさん、フォローありがとうございます。

他の方法として、メッセージボックスが出た時に
Ctrl+Pause(その後終了ボタン)でもマクロの
実行を中断できますよ。
 ───────────────────────────────────────  ■題名 : Re:毎月アクセスできる期間を限定するには...  ■名前 : hana  ■日付 : 03/2/27(木) 13:30  -------------------------------------------------------------------------
   基本的なことをわかっておらずすみませんでした。。
ありがとうございました!
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 806