VBATips

複数のセルに数式を一括で入れたい 複数のセルに数式を入れる際、参照先を固定しない場合にどうやったらいいか忘れることも多く、備忘録で残します。 複数のセルに数式を一括で入れるサンプルコード 注意点 特に...

案件で何度か作成していたため、これを機にブログに落とし込みます。 ユーザーが指定した背景色を微妙に変化させたいため、 10進数で表示される色データをRGB形式に変換かけて変数保持したいケースが有りまし...

保存するファイル名が重複しないように連番をつけたい VBAマクロを実行する際、ファイル保存する際、ファイル名が重複していないかどうか知りたい場合があります。 このようなよく使う基本コードはパーツ化して...

実行時エラー'438'オブジェクトは、このプロパティまたはメソッドをサポートしていません。 こちらのコード、実行すると下記のエラーが出ます。 実行時エラー'438': オブジェクトは、このプロパティま...

Debug.Printで改行をさせたくない 通常Debug.Print使用すると改行されてしまいます。 イミディエイトウィンドウはMAX200行なので、改行されずに表示されたい場合があります。 ;を使...

Dateで取得した年月日をそれぞれ別で変数に持たせたい マクロ開発案件で年月日をそれぞれ分けて変数で持ちたい場合があります。都度Year関数/Month関数/Day関数で分岐しても良いのですが、数が多...

UserFormを最前面に常に表示したい マクロ代行開発案件にて、ブックが重すぎるのかUserFormが最前面に表示されない現象を確認しました。 WindowsAPIで無理やり最前面に表示ができるよう...

エクセル起動時にマクロを実行させない（起動時処理の無効化） Workbook_OpenやAuto_Openの記述があるマクロ付きエクセルブックは、 ブックを開く際にWorkbook_Open、Auto...

罫線を「無し」という種類にする Border.LineStyleプロパティから、罫線を「無し」という種類にして罫線を削除することができます。 その場合、Borders.LineStyleの設定値を x...

Windowsのゴミ箱を空にしたい VBAマクロを実行する際、以下を利用して、削除する場合があります。 フォルダ削除(RmDirステートメント) ファイルをゴミ箱に移動する【Namespace(10)...

ニ次元配列内に指定した文字が含まれるかどうか判定したい(部分一致/あいまい検索) 配列データと指定文字を完全一致ではなく、あいまい検索したい場合があります。 パーツ化することで、今後の開発の時短に繋が...

プロシージャを［マクロ］ダイアログに表示させたくない VBA開発案件にて、ユーザー側にマクロ名を表示させたくないケースがあります。 その場合、ツールバーの「マクロ」を選択して起動した下記画面に、 指定...

Variant型変数が初期値か否か判定したい VBA開発案件にて、Variant型の変数で2次元配列で処理をする案件があり、 データが初期値の空の場合(Emptyのまま）は、初期化処理するようにしたい...

指定ブックのシートの並びを名前順に並び替える VBA開発案件にて、運用ブックは本来名前順(日付順)で並んでいる想定が、 ユーザーが触ってしまったなどで並びがおかしい場合があります。 ユーザーにその部分...

オートシェイプが存在するセル位置(セル番地)を取得したい 開発案件でたまにオートシェイプの位置からプログラムを分岐させるケースがあります。 オートシェイプにはAddressの概念はないため、 オートシ...

使い方 上記をお好きなモジュール内にコピペしてください。 実際に使用する時は以下のような形で使用してください。 注意点 上記コードのみでは動かず、最終行を取得するコード（Call_LastRowWs）...