きなこSHOW

VBAと日々の戯言

VBA

Accessクエリの結果セットを配列で返すサンプルVBAを紹介します

Accessでクエリの結果をExcelシートに出力する場合、クエリの結果が配列に格納してあれば貼り付けはとても簡単です。それでは、Access側でクエリの結果を配列に格納するにはどうするか? コピーしてそのまま使えるサンプルを紹介します。

AccessからExcelテンプレートをひな形にして新規Workbookを作成するVBAサンプル

Access VBAから新規Excelシートを作成するサンプルを紹介します。 テンプレートありの場合と無しの場合、出力先Bookが存在する場合と指定なしで新規Bookを作成する場合の各パターンに対応した、コピーしてそのまま使えるコードになっています。

AccessVBAやクエリで営業日を計算する関数を紹介します

Accessで営業日を計算したいです。 にもかかわらず、AccessにはExcelのようなWORKDAY関数は用意されていません。 でも大丈夫。Accessで営業日の計算ができる関数とその使い方を紹介します。

Excelで営業日を計算する関数を紹介します

ExcelのWORKDAY関数やNETWORKDAYS関数は土日は自動計算してくれるけれど、年末年始など会社独自の休日はあらかじめセルに日付を入力しておく必要がある。常に休日シートを用意するのもちょっと現実的でない。今回は、休日セル無しでも営業日を計算してくれる…

Accessで「お待ちください」メッセージフォームを表示するサンプル

Accessで長い処理を実行している間「お待ちください」みたいなメッセージを表示すれば、ユーザーに少し安心してもらえるかなと思います。

安定したVBAソースコードにはネガティブなコメントが盛りだくさんなのです

自分のコードを眺めていて思う事があります。「~に失敗しました」「~が正しくありません」「予期せぬエラーが発生しました」ネガティブな言葉が盛りだくさんだなぁ...

Excel VBAで指定した範囲の値を配列に格納する関数を作ってみました

セル範囲に入力されたデータを配列に格納するテクニックをご存知でしょうか。 VBA処理の高速化に役立つ技で、頻繁に使われています。 今回そいつを汎用的に使えるように関数化しました。 コピーしてそのまま使えるサンプルプログラムを公開します。

Excel VBAで最終列を取得するサンプルを紹介します

お次は値が入力されている最終列、最大列といいますか、それを取得する関数を公開します。 前回紹介した最終行関数は呼び出し例もなく不親切だったので、呼び出し方法もあわせて紹介いたします。

Excel VBAで最終行を取得するサンプルを紹介します

Excelで事務処理系を自動化するツールを普段作っていますが、データが入力されている最終行とか最終列を取得したい時ってけっこうあります。Excelのバージョンを問わずツールで使いまわせるように、私はvbaで関数化しています。コピーして使えるサンプルを紹…

詰める

前回の記事から2年放置していました。誰も見てないからいいよね。 某掲示板で、「ExcelのWorksheetでコードが空の行を詰めたいんだけどどうしたらいいの」というような内容のスレッドが立てられているのを見つけました。 かわいそうに誰も回答してくれなくて…

自動作表、検索型 3行サンプル

先日、こんな仕事を頼まれた。 商品名と数量のベタな一覧から、複数シートからなる固定フォーマットに商品名が並んだ「発注書」の数量欄に転記する、と言うもの。 ↓こんなイメージ ←ベタな一覧 この「数量」を商品名で検索して、発注書の「数量」欄に転記 発…