Wordの「スタイル」をVBAで操作する(2) (Word)

WordVBA

「標準」スタイルのフォントを変える前回 akashi-keirin.hatenablog.com のつづき。ウチの環境では、Document.Styles(194)で「標準」スタイルにアクセスできるのだった。 Style.Fontオブジェクト MSDN Dev Centerの「Style Members (Word)」によると、フォ…

2018-05-13

Wordの「スタイル」をVBAで操作する(Word)

WordVBA

Wordの「スタイル」をVBAで操作するウチの職場には、書類の英数字は等幅という謎ルールがある。まあ、位置が揃わないのが嫌なのはなんとなく分かる。ただ、「スタイル」という機能を知らずにWordを使っている人がほとんど（目測で９割以上）なので、文書…

2018-05-06

VirtualTableクラスへのメソッドの追加[getFilteredArrayメソッド]

VBA自作クラス VBAクラス・モジュール

VirtualTableクラス続報 akashi-keirin.hatenablog.com akashi-keirin.hatenablog.com 指定した条件を満たす配列を返すメソッド任意の列の値が指定した値であるレコードだけを格納した配列を返すメソッドを作ってみた。ひとまずコードを載っけておく。 get…

2018-05-05

Worksheet_Changeイベントの引数Target(Excel)

VBA覚書

Worksheet_Changeイベントの引数Target Worksheet_Changeイベントについては、イベントを起こすセル範囲を限定するのによく使う。引数「Target」に関する注意事項 Worksheet_Changeイベントが発生したときに、プロシージャに渡される引数Targetについて、ち…

2018-04-30

ExcelVBAでWordドキュメントを軽量PDF化する

VBA一般 VBA自作メソッド

ExcelでWordドキュメントを軽量PDF化する ExcelでWordドキュメントのファイル名の一覧表を作って、必要なものだけPDF化する、というのがお題。 ExportAsFixedFormatメソッドを使うやつは既に作成済みなので、PDF化部分を差し替えるのが目標。ドキュメントを…

2018-04-30

プリンタ名を調べる

VBA覚書

プリンタ名を取得する akashi-keirin.hatenablog.com コチラをうｐしたところ、Twitterで次のサイト（『パソコンの小技・備忘録（ExcelのVBAで、パソコンのプリンタ一覧を取得したい。）』）をご紹介いただいた。たぶん、プリンタ名を比較するときにApplic…

2018-04-28

ワークシートの軽量PDF化(Excel)

VBA一般

アクティブシートのPDF化 akashi-keirin.hatenablog.com このときにも書いたように、アクティブシートをPDF化するときにはWorksheet.ExportAsFixedFormatメソッドを使う。ただ、この場合、やたらファイルサイズがデカくなってしまうのが悩みのタネだった。…

2018-04-23

メソッド呼び出し時にモジュール名の記述を強制する

VBA一般

画期的なアイディア（嘘） akashi-keirin.hatenablog.com このときに、モジュール名を指定しないと使えない、とかだったら便利だと思ったんだけどなあ。とか書いていたんだが、画期的な解決法が思い浮かんだので記しておく。同一メソッドを持つダミーモジ…

2018-04-22

列挙体にはメンバを何個列挙できるか

VBA一般 VBA覚書

列挙体はいくつまで列挙できるか列挙体のメンバ数の最大って、いくつなのだろうか。ちょっと調べてみた。 Integer型の最大値 Integer型の最大値は32767。へえ。意外と小さいな。標準モジュールの宣言セクションに次のように書いてみる。 Public Enum MaxS…

2018-04-21

「名前の定義」再入門[Excel]

Excel一般（ワークシート関数など）

名前の定義セル範囲に名前を付ける方法 akashi-keirin.hatenablog.com コチラにExcelVBAer (id:x1xy2xyz3) さんからコメントをいただいた。その中に ①名前の定義で以下の２つを定義 ActCell = INDIRECT(ADDRESS(ROW(),COLUMN())) UpCell = OFFSET(ActCell,-…

2018-04-21

Range.BorderAroundメソッド[Excel]～車輪の再発明

VBA一般

車輪の再発明 Range.BorderAroundメソッド前回の akashi-keirin.hatenablog.com に、ぴぼったーさんからコメントをいただいた。曰く、つ borderaroundメソッドなんと、外枠線を引くメソッドがあったのだった。またしても車輪の再発明をしてしまったの…

2018-04-18

セル範囲の外枠に罫線を引く[Excel]

VBA一般

セル範囲の外枠罫線 VBAでセルの罫線の設定なんてしたことがなかったので知らなかったが、セル範囲の外枠だけに罫線を設定するのは非常にメンドクサイのだった。セルの罫線はRangeオブジェクト配下のBordersコレクションで管理されている。で、罫線の位置…

2018-04-16

ナゾの書式設定文字列（Range.NumberFormatLocalプロパティ）

VBA一般

ナゾの書式設定文字列「;;;」前回の akashi-keirin.hatenablog.com こちらに、ぴぼったーさんという方からコメントをいただいた。曰く、本日のサンプルのパターン、（要望）列方向に連続する場合に表記を省略する（実装）セルの結合を行う（Excel屋の…

2018-04-14

同じ値の連続するセルを結合する[Excel](Range.Mergeメソッド)

VBA一般

同じ値の連続するセルを結合する Excelは、表計算ソフトとしてよりも、方眼紙として使われているケースが多いと思う。そこで、大活躍するのが（ｗ）セルの結合機能だと思う。多くのExcel使いは、データを蓄積するためのシートで見栄えをよくするためにセル…

2018-04-14

isAutoFilteredメソッドの修正

VBA覚書 VBA自作メソッド

isAutoFilteredメソッドの欠陥 isAutoFilteredメソッドとは自作のFunction。 akashi-keirin.hatenablog.com このときに作ったもの。こんなふうにフィルターで絞り込まれていないときにFalseを返す。イミディエイト・ウインドウに ?isAutoFiltered(Sheet1)…

2018-04-12

半角カタカナを全角ひらがなに変換する（StrConv関数）

VBA覚書 VBA関数 VBA自作メソッド

半角カタカナと戦う（StrConv関数）名簿のふりがな欄いろんな名簿を作る必要があって、着手してから気がついた。名簿のふりがな欄、ふりがなの付け方めちゃくちゃやんけ！ある名簿は全角ひらがな。またある名簿は半角カタカナ。んで、StrConv関数を使っ…

2018-04-06

Document_Closeイベントで差込データソースとの接続を切断する

WordVBA VBA覚書

Document_Closeイベントの挙動差し込み印刷の設定をしているドキュメントは、一旦閉じると、次回起動時に自動的に前回接続していたデータソースに接続しようとする。これはこれで親切機能なのだが、何も知らない人が差し込み設定をしたドキュメントを別の…

2018-04-06

「標準モジュール」とは何ものなのか

VBA一般 VBA覚書

「標準モジュール」とは何ものなのか割と最近まで、「標準モジュール」というのは、単に【コードを書く場所】ぐらいの雑なとらえ方で済ませていた。しかし、「クラスモジュール」とか、「フォームモジュール」、「シートモジュール」、「ThisWorkbookモジ…

2018-04-01

配列変数を値渡しにする

VBA覚書

値渡しの配列引数配列引数を値渡しにする方法 akashi-keirin.hatenablog.com このときにも書いたとおり、通常、プロシージャの引数に配列を渡すとき、 Public Sub hogehoge(ByVal foo() As String) みたいにすると、こんなエラーが出る。ところが、VBA四…

2018-04-01

VirtualTableクラスは今

VBAクラス・モジュール VBA自作クラス

VirtualTableクラスは今 VirtualTableクラスの現状 VLOOKUPにせよ、INDEX & MATCHの合わせ技にせよ、セルに数式がずらずらと書き込まれているというのはちょっとイヤなので、表引きは極力VBAでやっている。んで、VLOOKUPみたいな働きを持ったクラスを作った…

2018-03-27

配列を引数にするときの注意

VBA覚書

配列を引数にするときの注意事項配列引数はByRefでなければなりません SubとかFunctionの引数に配列を使用しようとしたとき、「ByVal」キーワードを付けると、こんなふうにコンパイル・エラーになる。従って、引数を配列にしたときには必然的に参照渡しに…

2018-03-27

文字列を比較演算子で比較するとどうなるか

文字列を比較演算子で比較する文字列を比較演算子で比較した結果何の気なしに、イミディエイトに次のように打ち込んで[Enter]してみた。 ?"ち～んｗ" < "た～んｗ" すると、このように、Falseが返った。んで、 ?"ち～んｗ" < "つ～んｗ" と入力して[Ente…

2018-03-27

Not演算子は何をしているのか

VBA覚書

Not演算子は何をしているのか Boolean型の式の判定もともと、 If isHoge = True Then fooBar みたいな書き方をする方だった。 If isHoge Then fooBar みたいな書き方が、何か大切なことを省略しているような気がしてイヤだったのだ。ところが、あるときtho…

2018-03-26

VBAで擬似continueを実現する（失敗）

VBA覚書

擬似continue 「VBAのイマイチなところ選手権」でもやったら、かなり上位に食い込むだろうと思うのが、 Forループでcontinueが使えないことだと思う。 breakに相当する命令があるだけに、なおのこと歯痒いことだろう。テスト用コードリスト１標準モジュ…

2018-03-21

SUM関数の謎[Excel]

Excelマクロ無し縛り Excel一般（ワークシート関数など）

SUM関数のナゾ akashi-keirin.hatenablog.com に、id:mmYYmmdd さん（勝手に脳内で「ヤマダさん」と呼んでいるｗ）からコメントをいただいた。曰く、 =SUM(1/COUNTIF(範囲,範囲)) だと求める値にならないけど、中身の「1/COUNTIF(範囲,範囲)」をF9で確定して…