bookの名前が変更されたら開かなくする方法

The following two tabs change content below.

• この記事を書いた人
• 最新の記事

taka

あることがキッカケでVBAを独学で勉強しました、今ではブログを通してVBAでできることを解説しつつ、VBAや他の言語の勉強、ブログ運営の勉強をしています(^^♪

最新記事 by taka (全て見る)

• VBAでATMのようなランダムキーを作ってみた - 2018年10月17日
• IT企業てどんな感じ？ブラックが多いの？実際に社長に聞いてきた！ - 2018年10月15日
• 【雑記】親知らずの抜糸してきました！意外と痛い！ - 2018年10月14日
• 【雑記】親知らず(水平埋没知歯)を抜きました！ - 2018年10月10日
• VBA　SimpleAPIを使ってWikipediaの情報を簡単に取得してみた - 2018年10月3日

bookの名前が変更されたら開かなくする方法

ふと思いついただけなので暇つぶしにでも見てもらえると嬉しいです。前に会社で同僚にファイル名を変更されたことがあったのでその対策をと思いまして。bookの名前が変更されたら開かなくする方法を紹介いたします。VBAを知らない方なら効果てきめんだと思います。

bookの名前が変更されたら開かなくするコー

非常にシンプルなコードです。【Book1.xlms】というファイル名じゃない場合に動くコードです。

ちなみにコード中の【ThisWorkbook】とは【このコードが書かれているBook】という意味です。

注意

このコードは開いた瞬間に実行されるコードですのでファイル名が違うと開かなくなりますのでご注意ください。

もしファイル名を忘れてしまい開けない場合は場合はキーボード左上にある【Escキー】を押しながら開くとプログラムが中断されて開けます。

もっと確実に開かないようにしたいとする場合
コメントアウトされている※のところに【Application.EnableCancelKey = xlDisabled】を追加してください。この一文を追加すると【Escキー】を無視するという命令が付け加えられますので真面目に開くのが困難になります。

ファイルやコードの利用、WEBサイトの利用について

Sponsored Link

特別企画！IT企業の実情をIT企業の社長に聞いてみた！

独学者が多いVBAプログラマー「せっかくプログラム言語を覚えたし、IT企業に転職しようかな？でも、IT企業って良いイメージ聞かないし実際はどうなんだ？」という疑問にIT企業の社長に直に聞いてみました！！

記事を見てみる