クラスのPrivateメソッドもイミディエイトで実行できる

VBAクラス・モジュール VBA覚書

クラスのPrivateメソッドもイミディエイトで実行できる再び超小ネタ。クラスモジュールの準備クラスモジュールを作る。リスト１クラスモジュール 'オブジェクト名は"HiddenBooks"' Private Function isHiddenBook( _ ByVal targetBook As Workbook) As …

2018-09-22

個人用マクロブックはアドインに非ず

VBA覚書

個人用マクロブックはアドインに非ず「当り前だろバカ！」と思ったらスルー推奨。 IsAddinプロパティイミディエイト・ウインドウに ?Workbooks("PERSONAL.XLSB").IsAddin と打ち込んで[Enter]をポチッ。すると、 Falseが返るのであった。 Windows.Countプ…

2018-09-14

Split関数の裏技

VBA関数 VBA覚書

Split関数の裏技このとき、 akashi-keirin.hatenablog.com thom (id:t-hom) さんに教えてもらった。 Split関数の第２引数は省略できる完全に思い込みで必須だと思っていた。なるほど、Office VBA Reference の Split Function の項によると、 Syntax Spli…

2018-09-01

ファイルのコピーを作成する（FileSystemObjectオブジェクトのCopyFileメソッド）

VBA一般 VBA自作メソッド VBA覚書

ファイルのコピーを作成する FileSystemObjectオブジェクトを用いる。ファイルのコピーを作成するFunction FileSysetmObjectオブジェクトのCopyFileメソッドをラップする。参照設定でMicrosoft Scripting Runtimeにチェックを入れておく。リスト１標準モ…

2018-08-31

シートモジュールとインターフェイス

VBA一般 VBA覚書インタフェース

シートモジュールにインターフェイスを実装する単なる実験。インターフェイスを作成するクラスモジュールを挿入して、次のコードを書く。オブジェクト名はIA1ValueShowableとする。ちなみに、Instancingプロパティの値を「PublicNotCreatable」にしてい…

2018-08-31

「オブジェクト型の定数」的なものを設定する

VBA一般 VBA覚書

オブジェクト型の定数定数は便利な仕組みだが、オブジェクト型の定数は指定できないっぽい。 Range型の定数を定義しようとしてみる標準モジュールの宣言セクションに、次のように書いてみる。で、[Enter]を押してみると、こんな風に、コンパイルエラーっ…

2018-08-26

Propertyを使って配列定数っぽいものを実現する

VBA覚書 VBA一般

列挙体とPropertyを組みあわせて配列定数っぽくする前回 akashi-keirin.hatenablog.com のつづき。 Propertyに配列をセットする Propertyプロシージャ内でArray関数を用いて、Propertyに配列を持たせるようにした。標準モジュール Option Explicit Private…

2018-08-22

配列は定数にはならない

VBA覚書 VBA一般

配列を定数にすることはできるのか配列は定数にできるのだろうか。やってみた標準モジュールの宣言セクションに、次のように書いてみた。リスト１標準モジュールの宣言セクション Option Explicit Private Const CONST_ARRAY As Variant = Array("アホ"…

2018-08-19

Workbook.LinkSourcesメソッド(Excel)

VBA一般 VBA覚書

Workbook.LinkSourcesメソッド何気なくggっていたら、WorkbookオブジェクトのLinkSourcesメソッドというものを見つけた。 MicrosoftのOffice VBA Reference：Workbook.LinkSources Method (Excel) のページによると、 Returns an array of links in the wor…

2018-08-18

名前、定数、列挙体(Excel)

VBA一般 VBA覚書

名前、定数、列挙体ちょっと、PINK FLOYDっぽいタイトルだったのでつい……。名前、定数、列挙体に同じ文字列を使ってみるワークシートのＡ１、Ａ２、Ａ３セルに、それぞれ「aho」、「baka」、「kasu」と名前をつけておく。んで、次のように定数と列挙体を…

2018-07-14

Sheetオブジェクトを変数にぶち込むと自作Propertyにアクセスできない？

VBA覚書

Sheetオブジェクトの自作Propertyが呼び出せない？ Sheetオブジェクトをぶち込んだ変数からアクセスできない前回の akashi-keirin.hatenablog.com で作成したPropertyに、Sheetオブジェクトをぶち込んだ変数からアクセスしようとしたらできなかった。リス…

2018-07-10

Rangeプロパティの引数に定数・変数を使う(Excel)

VBA覚書

Rangeプロパティの引数通常、Rangeプロパティの引数と言えば、 [親オブジェクト].Range("A1") のように、セルの番地を指定する。しかしながら、このやり方だと、マジックナンバー的になってしまって、不便だなあと思っていた。セルに名前を付ける、という…

2018-06-10

君は[Ctrl]＋[J]というショートカットキーを知っていたか(VBE)

VBA覚書

[Ctrl]＋[J]というショートカットキー [Ctrl]＋[J]の働き Twitterで、thom (id:t-hom) さんが教えてくださった。曰く、識別子はCtrl+Jで入力候補でると。え？そ、そうなんすか？？？というわけでちょっとやってみた。変数名の入力中に[Ctrl]＋[J] こん…

2018-05-05

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

VBA覚書

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

2018-04-30

プリンタ名を調べる

VBA覚書

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

2018-04-22

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

VBA一般 VBA覚書

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

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-03-27

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

VBA覚書

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

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-20

コメントの表示・非表示を切り替える[Excel]

VBA覚書

コメントの表示・非表示を切り替えるコメントの表示・非表示を切り替えるマクロ今まであまりコメントをVBAで操るということをしたことがなかったのだが、仕事でマクロ無し縛りで結構ややこしい数式を組み込んだワークシートを作る必要があり、書いた自分…

2018-03-18

指定した名前のセル範囲が参照切れだったら削除する(Excel)

VBA覚書

定義された名前を消すそういえば、定義された名前をVBAから消すのって、どうしたらいいんだろう？そう思ってちょっと調べてみた。 WorkbookオブジェクトのNamesプロパティコチラによると指定されたブックのすべての名前 (すべてのワークシートの名前を含…

2018-03-18

配列の各要素にはFor Each ～ Nextでアクセスできる

VBA覚書

配列の各要素にFor Each ～ Nextでアクセスする配列の要素にはFor Each ～ Nextでアクセスできる akashi-keirin.hatenablog.com コチラに jinoji さんという方からいただいたコメント。配列からの取り出しを For Each e In TargetArray とやれば2次元配列…