Base自分用のナレッジベース。Server、オープンソース系のシステムやフリーソフトに関する情報、iPhone、Androidスマホ便利情報など役立つ情報などを覚書しておくためのブログ。VBAAcessのVBAで指定した日を起点として指定した日数後の営業日の日付を返すユーザー定義関数を作ったので覚書。2015/1/26(水)から5営業日後の日付を求めたい時などに使用するためのユーザー定義関数のサンプルプログラムです。VBA:指定した日付がお休み(祝祭日、土日)かどうかをチェックするユーザー定義関数」の記事で作成した"CheckHoliday"を使用します。VBA:指定した日付がお休み(祝祭日、土日)かどうかをチェックするユーザー定義関数」の記事に記載されている"CheckHoliday"関数を作成するために必要な準備と"CheckHoliday"関数を作成してから紹介するユーザー定義関数のサンプルプログラムを作成してください。今回紹介するユーザー定義関数のサンプルプログラムは、例えば「注文を受けた日からXX営業日以内」などの条件があった際に注文を受けた日(起点となる日)と何営業日目かを示す数値を指定することで「注文を受けた日からXX営業日後」の日付を返します。VBA:指定した日付がお休み(祝祭日、土日)かどうかをチェックするユーザー定義関数」の"CheckHoliday"関数を利用することで祝祭日などが含まれていてもそれを考慮した営業日を返すようになっています。ユーザー定義関数のサンプルプログラム作成するユーザー定義関数のサンプルプログラムのコードは以下のとおりです。AccessのVBAの標準モジュールに記載してください。GetWorkDay([受注日],5)[受注日]が2016/1/27だったとすると5営業日後は土日を挟むので2016/2/3が値として返されます。Server:日付時刻データから時刻部分を取り除いて時刻を00:00:00にする。端末にAPNが正しく設定されていません。(11/05)プロフィールこのブログの中の人:billyboyこのブログを見に来てくれてありがとうございます。このブログの中の人はExcel、AccessのVBAに関するカスタマーサポート、技術ドキュメントのの作成業務を経験後、開発系SEを経て現在は金融系企業のシステム運用/保守SEとして働いています。当初自分が困ったときに解決した方法や社内/外からの技術的な問い合わせに回答した時に作ったプログラムなどを自分用の備忘録としてこのブログを開設しました。たくさんの方に見に来ていただけてることに気づいてからはなるべく誰が見てもわかるような記事内容にすることを意識して書いています。