質問: 「またまたExcelで教えてください。 日付を自動的に当日にすることは出来るのですが、どうしても末日にすることが出来ず、毎回入力しなくてはなりません。 自動的に末日にしたり毎月第2金曜日にしたりしたいのですが、、、出来ますか? 例えば第3木曜日だったら3月に開いた時に自動的に「3月15日」になったり。 末日なら3月に開いたら自動的に末日である日の「3月31日」になったり。それで末日が土日だったらこれまた自動的に金曜日に出来たらいいなぁと。。。 3月は31日が土曜日なので末日になるようにしてても土日だから自動的に30日になってほしい。 可能でしたら是非教えてください。そして初心者並みに解りやすくお願いします。 」 という質問をさせていただき、いろいろ教えていただいたのですが。。。祝日を考え忘れていました。グスン (ノ(ェ)'。) 土日祝祭日にかかる月は出てくると思いますので(何年先でも)それも自動的に平日になるように出来る方法を教えてください。 可能でしたら土日祝祭日の前日若しくは前前日と翌日、若しくは翌々日の両方を初心者レベルで解りやすくお願いします。
回答: まず、VBAの始め方から http://www.macrospread.com/introduction/images/VBA_Introduction_... の標準モジュールにダウンロードしてきたエクセルのファイルのWhatDay()関数の全文をコピーして私の書いたコードもコピーします。 こんな感じ ``` Function WhatDay(日付) As Integer ・ ・ ・ End Function Function Heijitu() As Date ・ ・ ・ End Function ``` そして、呼び出したいセルの数式に[=Heijitu()]と入れるだけ。 ついでにそのセルの書式設定を日付にしてね。