シートモジュールにPropertyを生やそう！ シートモジュールにPropertyを設置すると便利、というだけの話。 準備 たとえば、ワークシート（オブジェクト名は「Sheet1」）上に、次のようなリストがあるとする。 とりあえず超シンプルな表にした。 Propertyを設…

Switch関数はRangeオブジェクトを返すか 前回 akashi-keirin.hatenablog.com 初めてその存在を知ったSwitch関数。 こいつは、たとえばRangeオブジェクトを返したりすることはできるのだろうか。 やってみた。 準備 Sheet1オブジェクトに次のようなPropertyを…

Switch関数というものがある 知ってました？ 私は全然知らなかった。 何気なく『Programming Excel with VBA and .NET』という本を読んでいたら、59ページに、 Sub GetResponse() ' Declare variable as an enumerated value' Dim res As VbMsgBoxResult ' G…

Staticプロシージャというものがある 知ってました？ 私は全然知らなかった。 何気なく『Programming Excel with VBA and .NET』という本を読んでいたら、58ページに、 Private Static Sub Proc3() ' In Static Procedures, all local variables are Static.…

PublicNotCreatableの意味 クラスモジュール使いであっても、あっちこっちで使い回すようなクラスモジュールを作ったりしなければ、存在にすら気づかないのが、クラスモジュールのInstancingプロパティではなかろうか。 Instancingプロパティに、「Private」…

アクセス修飾子「Friend」とは？ 勘違いから、マヌケな記事を書いてしまった。 訂正記事を書くのがめんどくさいので（←コラ！）、バッサリ削除して書き直す。 アクセス修飾子「Friend」は、入門書の類にはまず出てこない。 名前が「Friend」なのに、友達がい…

テスト用メソッドもPrivete指定にする Privete指定でもVBE上で実行できる これは、考えてみたら当り前なんだけれど、全然気づいていなかった。 イミディエイト・ウインドウ上での実行 次のようなメソッド群を用意する。 リスト１ 標準モジュール Private Sub…

Priveteメソッドでもコマンドボタンから呼び出すことができる 常識ですか？ 私は存じ上げませんでしたので、今まで何でもかんでもPublic指定にしていた。 そのせいで、「マクロの登録」ウインドウなんかを開くと、 こんなひどい有様にｗ Privete指定のメソッ…

素因数のセットを取得するFunction 前二回 akashi-keirin.hatenablog.com akashi-keirin.hatenablog.com の集大成として、素因数のセットを取得するメソッドを作ってみた。 コード モジュールごとコードを載っけておく。 リスト１ 標準モジュール Option Exp…

次の素数を取得するFunction 数字を受け取って、その数字よりも大きい最小の素数を返すメソッドを作った。 コード リスト１ 標準モジュール Private Function getNextPrimeNumber( _ ByVal targetNumber As Long) As Long Dim ret As Long ret = targetNumbe…

素数かどうかを判定するFunction(2) 前回 akashi-keirin.hatenablog.com をちょこっと修正。 割り算の試行は平方根近似値までで良い 高校生が実に明解に説明してくれていた。 www.higashi-h.tym.ed.jp 富山県立富山東高等学校の諸君、本当にありがとう!!!!!!…