管理人Kのひとりごと

デジモノレビューやプログラミングや写真など

【改訂版】「VBA プロジェクト オブジェクト モデルへのアクセスを信頼する」設定画面を開くためのマクロを作ってみました

前回☟のもの、Office2013同士でも、また、Office2016では挙動が異なることが判明。

オプション画面を開いたとき、左ペインにフォーカスがあるため、そのまま下へ移動するよう修正しました。
Office2013でも、Office2016でも動いていました。

続きを読む

【訂正版あります】「VBA プロジェクト オブジェクト モデルへのアクセスを信頼する」設定画面を開くためのマクロを作ってみました

Excel2003くらいからですかね、VBAProjectオブジェクトへアクセスする際、「VBA プロジェクト オブジェクト モデルへのアクセスを信頼する」にチェックが入っていないといけなくなったじゃないですか。
普段からチェック入れたまま、というのもアレですし、かといって、設定箇所どこだっけ...みたいになりがちじゃないですか。
これです☟
f:id:ksk1130:20170426233638p:plain

というわけで、「VBA プロジェクト オブジェクト モデルへのアクセスを信頼する」を開くためのマクロを作りました。VBAでひたすら当該箇所までのキー押下を再現しています。
標準モジュールに以下のソースを書いて実行です!
チェックON/OFFはトグルなので、最終的にONなのか、OFFなのかは目視確認が必要ですが、どこだっけ...?の手間は軽減できると思います。

    • 追記

Office2013で検証したのですが、Office2013同士でも、また、Office2016では挙動が異なることが判明。書き直しました☟

追記ここまで--

続きを読む

夢の島熱帯植物館へ行ってきました

雨が降りそうな天気でしたが、散歩したかったので、夢の島熱帯植物館へ行ってきました。

こちら、入館料は大人250円とリーズナブル!それでいて、熱帯植物に触れることができます。
熱帯の気候はごみ処理場の排熱を利用しているということで、エコでもありますね。
入園してすぐは、「あったかいなぁ」でしたが、終盤には、「あれ、少し暑いかも」と感じるくらいでした。
春先は絶好の見学日和かもしれませんね。植物ごとに「花盛り」のタイミングが異なるようで、年中を通して、様々な植物の「旬」を楽しめそうではあります。
現在は、ランが見ごろのようでした。

本日のお供はG9Xです。あぁ、これはGM1(S)が留守番することが増えてしまいそうだなぁ...そんなカメラです。

続きを読む

京葉線東京駅から有楽町駅を目指してみました

昨日お仕事で幕張方面へ行ったんです↓

で、思い出したんです。京葉線乗り換えは、東京駅ではなく、有楽町駅からの方が近いと。

ということで、京葉線東京駅から、有楽町駅へ向かうのは本当に近いのか、を実際歩いて確かめてみました。
有楽町駅から乗り換える際は、改札で申し出る必要があるそうですね。

続きを読む