2010年11月11日

付録.VBAマクロで万年カレンダーを作る

 先のExcelのワークシートを使った万年カレンダーは、論理関数の{ IF }関数、日付関数の{ WEEKDAY }関数、情報関数の{ ISERR }の3つの関数を使って作りましたが、他の関数を使っても作ることはできます。でも、なんだか物足りないですね。
 たぶん貴方のお部屋にあるカレンダーと、デザイン以外に違う点は祝祭日の取り扱いと、振替休日です。ワークシート関数を使って、やれないことはありませんが、VBAマクロで作ったほうが簡単です。
 VBAマクロで、ユーザーフォーム上にカレンダーを作ってみましょう。ただ、ユーザーフォームには「セル」がありませんから、ベルコントロールやテキストボックスコントロールを「セル」に見立てて、次のような形を作り上げてみました。
ExcelVBAマクロExcelで万年カレンダーを作る
 VBAマクロの中身といえば、日曜日、土曜日、平日の判定、それと大事な【 元日・建国記念の日・春分の日・みどりの日・憲法記念日・国民の休日・こどもの日・秋分の日・文化の日・勤労感謝の日・天皇誕生日 】の判定、また、振替休日の判定です。 マクロソースにはVBAプロジェクトロックのパスワードを掛けていませんので参考までにダウンロードしてソースを見てください。



posted by くきお at 11:11| Comment(2) | ExcelVBAマクロ | このブログの読者になる | 更新情報をチェックする
この記事へのコメント
こんにちは、初めまして 
VBAカレンダーを利用させていただいています。とても感謝しています。

2020年にオリンピック開催に向け、休日が例年になく変更され困っています。
特に、海の日(7/20例年7月第3月曜日)がオリンピックのため7/23へ変更
又、体育の日(10/10例年10月第2月曜日)がオリンピックのため7/24へ変更されています。

この2点の変更ができていません。とても恐縮ですが助言いただけないでしょうか?

よろしくお願いします。
Posted by いはらかずひこ at 2019年12月29日 13:56
おはようございます。上記質問の件で、更に検討しまして、何とか解決できました。お騒がせしました。申し訳ありませんでした。
この質問取り消します。
Posted by いはらかずひこ at 2020年01月02日 09:34
コメントを書く
お名前:

メールアドレス:

ホームページアドレス:

コメント:

認証コード: [必須入力]


※画像の中の文字を半角で入力してください。
×

この広告は180日以上新しい記事の投稿がないブログに表示されております。