[[20190607083036]] 『最初に開くワークシートを指定したい』(fuu) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『最初に開くワークシートを指定したい』(fuu)

ワークシートが複数あるブックを開く際に指定のワークシートを
最初に開くようにしたいのですが方法がわかりません。
ご存知の方、よろしくお願いします。

< 使用 Excel:Excel2016、使用 OS:Windows10 >


指定のワークシートがアクティブなときに保存する癖をつける
じゃダメです?

マクロがアリなら、方法はわかりますが、セキュリティの観点からなんでもかんでもマクロ付ブックにするのは避けたほうがよいと考えるので、とりあえずコードは提示しません。

(もこな2) 2019/06/07(金) 09:10


対象ブック全てにマクロを入れる事になりますが、ThisWorkBookに、以下のコードを貼ってください。(マクロ有効で開く必要があります)
 Private Sub Workbook_Open()
    Sheets(1).Activate
 End Sub

または、保存する前に任意のシートをアクティブにするコードを書いても良いでしょう。 この考え方なら、こちら。

 Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Sheets(1).Activate
 End Sub

しかしながら、自動化せずとも、手動でアクティブにしてから保存する癖を付ければ済む話だと思いますけどね。
(???) 2019/06/07(金) 09:34


複数の人が利用するブックですので利用上の注意事項やファイルの保存方法などを
伝えるためにワークシートを指定すればと良いのでは考えておりました。
もっと別の方法があればそちらもご教示いただけますでしょうか。

(fuu) 2019/06/07(金) 16:46


文字列表示したいだけであれば、ユーザーフォームにラベルを貼って、ここに文字を書いておく、というのはどうでしょうか? そして、ブックを開くと同時にフォームも開いてしまうのです。

操作の邪魔にならないよう、UserFormのStartupPositionプロパティを「0-手動」にしておけば、デフォルトでは画面左上になります。 あとは、ThisWorkbook に、以下のコードを貼っておくだけ。

 Private Sub Workbook_Open()
    UserForm1.Show vbModeless
 End Sub

でも、シートにせよフォームにせよ、使う人は慣れてくると、そんな表示は邪魔に感じると思うのですよね。 だから何も小細工せず、「注意事項」とかのシート名で、先頭または最終に置いておくだけで十分だったりしないでしょうか? 読みたいときだけ読んでね、という感じで、読む事を押し付けない。
(???) 2019/06/07(金) 17:06


色々とありがとうございました。
試してみて困ったことになれば、その際はよろしくお願いいたします。
(fuu) 2019/06/10(月) 16:40

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.