私の初めてのマクロ 今さらながら、私とVBAとの出会いについて書いておこう。 VBAとの出会い きっかけは、 番号入力セルに番号を入力してプリントアウト、次の番号を入力してプリントアウト、次の番号を入力してプリントアウト……を150回ぐらい繰り返す、とい…
ち～んｗ珍現象、解決す ご心配をおかけしました。 前回 akashi-keirin.hatenablog.com のち～んｗ珍現象がなぜか解決いたしましたので、ご報告申し上げまする。ニンニン。 あまりにしょうもない顛末なので、怒らないように。 これまでの対処法 カウントダウ…
VBAでwavを鳴らしたらち～んｗ珍現象が起きた 解決方法を知っている人がいたら、教えろ教えてください。 KitchenTimerクラス 前に、 akashi-keirin.hatenablog.com こういうものを作ったら、職場で割とウケたので、「残り時間を表示するカウントダウンタイマ…
ユーザが選択したファイル名を取得する これまで ユーザが選択したファイル名を取得する(1) ユーザが選択したファイル名を取得する(2) ユーザが選択したファイル名を取得する(3) ユーザが選択したファイル名を取得する(4) ユーザが選択したファイル名を取得…
ユーザが選択したファイル名を取得する 一応、前回 akashi-keirin.hatenablog.com のつづき。 FileDialogFiltersオブジェクトの設定 前々回のリスト１では、FileDialogFiltersオブジェクトを設定するのに Dim fpDialog As FileDialog Set fpDialog = Applica…
ユーザが選択したファイル名を取得する 前回までの三回 akashi-keirin.hatenablog.com akashi-keirin.hatenablog.com akashi-keirin.hatenablog.com で、ユーザにファイルを選ばせるところまでたどり着いた。 いよいよ、選択させたファイルのフルパスを取得…
ユーザが選択したファイル名を取得する 前々回 akashi-keirin.hatenablog.com 前回 akashi-keirin.hatenablog.com の続き。 ファイルフィルタを設定する フォルダ選択と違って、ファイルには「種類」というものがあるので、いつもいつも「すべてのファイル」…
ユーザが選択したファイル名を取得する 前回 akashi-keirin.hatenablog.com の続きです。 ダイアログボックスのタイトルを設定する これはメッチャ簡単。Filedialog.Titleプロパティを設定すれば良い。 リスト１ Private Sub test() Dim fpDialog As FileDia…
ユーザが選択したファイルのパスを取得する Application.FileDialogオブジェクトを使います。 FileDialogオブジェクトとは おなじみ、Office デベロッパー センターのFileDialog Objectの項には、 Remarks Use the FileDialog property to return a FileDial…
Worksheetクラスを継承したクラスを作る 超絶アホ企画。 少しオブジェクト指向をかじったVBAerなら、VBAのクラスモジュールに「継承」がないことは当然知っているだろう。 だから、あくまでも「擬似継承」である。 っていうか、ほとんど嘘である。 擬似継承…
楽曲データフォルダのフォルダ構成だけをコピーする（アルバムアートだけはコピーする） このとき akashi-keirin.hatenablog.com の続き。 フォルダ構成だけをコピーするんだけど、アルバムアートファイルだけはコピーする。 私の場合、アルバムアートは、全…
[Worksheet].Copyメソッドの改良？ [Worksheet].Copyメソッドについて、「オブジェクト ブラウザー」で調べてみると、 Sub、つまりvoidメソッドであることがわかる。 たぶん、プロがやったことなので、あえてvoidメソッドにしたことには意味があるのだとは思…
再帰処理に初挑戦 前回 akashi-keirin.hatenablog.com の続き。 Foobar2000用の音楽フォルダ管理の話。 とりあえず、フォルダの中身はコピーせずに、フォルダ構成だけを別フォルダにコピーしたい。 任意のフォルダ内の子フォルダだけを別のフォルダにコピー…
FileSystemObjectでフォルダを作る 当方、10年以上前から音楽ファイルの再生にはfoobar2000を使っています。 CDから楽曲データをリッピングしてエンコードするときに、勝手にフォルダを作っていくタイプのソフトウエアにどうしてもなじめなくて、面倒だけれ…
TextFileクラスは今…… akashi-keirin.hatenablog.com akashi-keirin.hatenablog.com テキストファイルを扱うことがあって、久しぶりに引っ張り出してみたら、いろいろと不具合が見えてきたので、修正した。 TextFileクラスの現在の姿 かつてのTextFileクラス…
文字列をバブルソートする ちょっとやってみた。 String型配列をソートして返すFunction とりあえず、ひととおりコードを晒す。 リスト１ 標準モジュール Public Function getSortedArray( _ ByRef tgtArr() As String, _ Optional ByVal isAscending = True…
FileSystemObjectによるファイル取り出しの順序 おなじみ、OFFICE TANAKAのコチラのページによると、「Dir関数が返すファイルの順番」は、 ディスクのフォーマットによって異なります。最近主流のNTFSでフォーマットされているディスクでは、ファイルが保存…
引数二つのProperty 前回 akashi-keirin.hatenablog.com 作成したCaptionBoxクラス。 テキストボックスの塗りつぶし色と透過性という基本的なセッティングをするのに、たとえば With captBox.Fill .ForeColor.RGB = vbBlack .Transparency = 0.4 End With と…
PowerPointのスライドにキャプションを置くクラス PowerPoint初心者です。仕事でもほとんど使う機会がなかったので、そこらへんの素人以下です。 スライドショー的なPresentation そんなPowerPointど素人の私が、画像中心のPresentationを作ることになった。…
目障りなエラーチェックマークを除去する 状況 セルに数字を文字列で書き込んだ場合、 このように実に目障りなことになる。 セルの左隅の緑色のスピードくじを一掃したい。 スピードくじを一掃するメソッド おなじみMicrosoft DocsのRange.Errors propertyの…
Enumの謎挙動 前々から気になっていたこと。 小ネタです。 誤入力防止のための記法 変数名などの誤入力に気づきやすくするために、パスカル記法やキャメル記法を使っている人はかなり多いと思う。 VBAの場合、変数名を、たとえばtooYoungToDieと宣言しておけ…
Enumの名前の重なり VBAでEnumを使い始めの頃、その当時はPublicとPrivateの使い分けがいい加減だったこともあり、ずいぶん名前の重なりに苦労した。 そこで、最近は列挙体名、要素名それぞれにシンプルなルールに基づいて接頭辞を付け、極力重複が発生しな…
モジュール切り分けの一つの考え方 長くVBAをやっていると、「このメソッドは、他でも使い回せそうだなー。」という場面に結構出くわす。 今回は、モジュールを切り分けるときの一つの考えかたをば。 文字列操作メソッドに特化したモジュール 文字列を操作す…
Len関数の返り値 Len関数に文字列ではなく数値を渡してしまい、意図しない値が返っていたために小ハマりしてしまったので、反省も込めて覚え書き的に記しておく。 Len関数に数値を渡すとどうなるか たとえば、次のようなコードの場合。 Dim hoge As Long hog…
[Worksheet].PageSetup.FitToPagesTall/Wideの設定はリアルタイムで反映されない 知ってました？ 私はこのことに気づかなかったせいで、お盆の期間だというのにドハマりして残業してしまいました。 状況 次のようなシートがあるとする。 四隅のち～んｗを一…
Boolean型Function作成時のコーディング規約 Forループで回すときなんかに、そもそも処理をすべきなのかどうかを判定し、処理の必要がなければ飛ばす、ということがよくある。 処理の要不要を判定する条件が単純なら、ブロック内でIf分岐すればよいが、判定…
foobar2000の楽曲データをいじくるためのモジュール 作ったので公開。 コード foobar2000のPlaybackStatisticsでエクスポートできるXMLをいじくるためのメソッド集的なモジュールを作成した。 一挙公開する。（2019/9/16更新） リスト１ 標準モジュールFB2KU…
順番の抽籤をする 研修会とかそういう機会に、発表の順序を決めるとき。 自薦方式をとったり、じゃんけんで決めてもらったりするのも良いが、Excelでやってみてもいいんではないか、と思った。 準備 次のようなシートを準備。 「抽籤！」ボタンをクリックす…
おれならこう書く（余計なお世話） Twitterを眺めていたら、 thunder0512.hatenablog.com こういうものを発見。 面白そうなので、〈おれならこう書く〉ってのをやってみようかな、と。 元記事の筆者さんにとっては、完全に 余計なお世話 だと思いますが、見…
ランダム席替えマクロ 作ってみた。 座席表の枠を作ったシートの機能なので、シートモジュールに生やしてみた。 準備 ランダムに並べるために、乱数発生用のメソッドを用意する。 今回は、標準モジュールにRandUtilと名前を付け、RandUtilモジュールのメソッ…
