タブ位置を気軽に設定するアドイン akashi-keirin.hatenablog.com これをもとに、アドイン化してみた。 コード ごちゃごちゃなしでコードを全部載せる。 リスト１ 標準モジュール Public Sub タブ位置設定() Dim objDoc As Document Set objDoc = ActiveDocu…

Officeのヴァージョンに合わせて煽る 私は、別に玄人でも何でもないので、自作のツールに煽りAAを入れる。 中でも気に入っているのが、有名な「ち～んｗ」のやつｗ ＿＿＿＿＿＿＿＿_ ／ ＼ ／ ／・＼ ／・＼ ＼ | ￣￣ ￣ | ち～んｗ | （＿人＿） | | ＼ |…

VBAで差込印刷のデータソースに接続する 差込印刷データソースの指定 以前、差込印刷のレコードごとにWordファイルを生成するということをやったことがあった。 akashi-keirin.hatenablog.com これはこれで、メチャクチャ便利で、重宝しているんだが、フォル…

ことごとく「背面」になっているテキストボックスェ…… 業務で引き継いだWordドキュメントがカオス…… 業務でWordドキュメントを引き継いだ。 で、そのWordドキュメントってのがひどいやつで、 40個ぐらい配置されているテキストボックスのレイアウトがことご…

直近のイベント発生日時を配列化するFunctionの修正 このとき akashi-keirin.hatenablog.com 作成したFunctionについて、対応できるイベントを増やそうとして、いろいろ不具合に気づいたので修正する。 コードへのリンクはコチラ。 １．無意味な判定をやめる…

直近のイベント発生日時を配列化するFunction このとき akashi-keirin.hatenablog.com 作成したFunctionは、 直近のイベント日時を取得するFunctionだったが、これをちょいと改造して、 直近○回分のイベント日時を取得して配列化するFunction にする。 改造…

Join関数というものがある Join関数 前回の記事 akashi-keirin.hatenablog.com に、 id:imihito さんからコメントをいただいた。曰く、 argsByArray 相当処理として、組み込み関数にJoin 関数というものが有ったりします ```vba Join(strArray, "！ ") ``` …

配列を引数にすることはできるのか 配列を引数にしてみる プロシージャの引数に配列を指定することはできるのだろうか、と思ってやってみた。 とりあえず、 Public Function argsByArray(ByVal ar() As String) As String としてみたら、 こんなふうにいきな…

直近のイベント日時を取得するFunctionの改良 前回 akashi-keirin.hatenablog.com の続きです。 イベントコードを引数として受け取る 前回は、シャットダウン日時を取得するFunction、起動日時を取得するFunctionの２種類を作ったわけだが、記事中でも言及し…

Windowsの起動・終了時刻を返すFunction ※改良版はコチラ。 直近の起動・終了時刻を返す 前回の akashi-keirin.hatenablog.com のリスト１に手を加えて、 直近のシャットダウン日時 今回の起動日時 を取得するFunctionを作ってみる。 今回作成したコード と…

Windowsのシャットダウン時刻を取得する Windwosのイベントログを取得するには？ Excel VBA質問箱 IV【74506】Re:VBAシャットダウン時刻取得にて、次のコードを発見した。 リスト１ 標準モジュール Public Sub test() '……(1)' Call EnumShutdownDateTime(Ran…