VBA

Word【VBA】

【Word VBA】グローバル メンバー (Word)のHelpを実行した結果サンプル

Globalオブジェクトの勉強のためのコード使い物にはならないかも。まず、MSDNよりWordのHelp と MSDNよりwdHelp列挙型 を調べる。Helpメソッドに、wdHelp列挙型を指定すると、何かがおきそうだ!ちなみに、以下がw...
Word【VBA】

【Wordマクロ】文中の文字、単語、文、段落を取得するサンプル

Wordマクロのサンプル、文中から、Wordの解釈する文字、単語、文、段落を取得させるサンプル各々のオブジェクトにそってRangeオブジェクトを取得させるようにしている。サンプルとしては、通し番号、オブジェクトの開始位置(文字、単語、文、段...
Word【VBA】

【word】サンプル文章(rand()、rand.old()、lorem() )

参考サイト1、参考サイト2適当なサンプルを出力するとき、word上で以下の関数を入力する。日本語:rand()、rand.old()英語:lorem() なお、オプショナル引数もあり、第1引数が段落の数、l第2引数が各段落に表示する行の数と...
Excel【VBA】

【EXCEL VBA】週数を指定した曜日を取得、月毎の日を取得

「GetTargetDay.zip」をダウンロード月単位で第X週の月~金曜日、毎月X日といった指定をすることで、指定の曜日を取得させるマクロ。定例作業の予定作成時に必要な日時を抽出するために作成。こういった「ある日」を見分ける感覚は、スケジ...
Tech

【Excel VBA】セルの書式を変えずに置換(Replace)する方法

「replace.xlsm」をダウンロードExcelの置換は、、置換後は必ず1文字目のフォントが、文字列すべてに適用される仕様になっている。それだと、不便なことがあったので、文字列のフォントをきちんと保存して、置換後に元に戻すマクロを作成。...
Excel【VBA】

【EXCEL VBA】ワークシート(自分自身)を、新規ワークブックにコピーするサンプル2

前回のサンプルから、少し改良前回のやりかたは横着しすぎていた。今回は、よりプログラマ好み(きっちりとコピー範囲やコピー方法をしている)と思う。シートのコピーペーストよりも、ワークブック、ワークシート、Range をきちんと握って値コピーをす...
Excel【VBA】

【Excel VBA】Enum(列挙型)のメンバ取得関数の作成例

C#やVB.net(最近の言語というくくり?)では、Enum(列挙型)のメンバー一覧が、簡単に取得できるがVBA だとそうはいかない。ただし、ちょっとしたマクロでもソースの可読性が高くなる定数やEnumは使うべきだし、そのメンバーを文字列で...
Tech

【VBA】Excelでセル内の一部分だけ書式ごと置換

最近知ったが、セル内に書式の異なる文字があった場合、置換をすると、設定した書式が無くなる(一律、先頭文字の書式になる)。(これは有名??)調べると、対策用のマクロをいろいろな人が作っているが、興味があったので、自分も使いやすいようにサンプル...
Excel【VBA】

【Excel VBA 】簡単なアダプター(adapter(委譲))もどき

自分なりの解釈で、あまり無理をしない簡単なデザインパターンのアダプター(adapter(委譲))もどき--- CMyData.cls(データクラス)Public Name As StringPublic Sub DebugPrint() D...
Excel【VBA】

【Excel VBA 】簡単なイテレータ(iterator)もどき

自分なりの解釈で、あまり無理をしない簡単なデザインパターンのイテレータ(iterator)もどき基本的な機能はcollectionオブジェクトを使っているので、コード量を少ないことと、出力時に”For Each”がつかえるメリットがある。 ...