エクセルマクロで毎月sheetを更新するのですが、セルＡ１に毎月、その

エクセルマクロで毎月sheetを更新するのですが、セルＡ１に毎月、その月の１日を自動的に入るようにするにはどうすればよいでしょうか。
現在は10/1と手入力しています。
NOW（）だと入力当日の日付が入るのでちょっと勝手が悪いです。
10/4でも10/1となるようにしたいのですが、どなたか教えていただけますでしょうか。
よろしくお願いします。

No.2 ベストアンサー 回答者： chupark 回答日時： 2010/10/04 10:31

関数式ならNo.1の方の回答のとおりです。

マクロで…　とありますので、
マクロで書かれるのであれば、

Cells(1, 1).Value = DateSerial(Year(Date), Month(Date), 1)

とかでしょうか。

この回答へのお礼

早々のご回答ありがとうございました。
出来ました！！
ずいぶん前からこのようにしたかったのですが、なかなか質問もせず、
毎月手入力で日付を入れていました。
今月から更新がますます楽になります。
ありがとうございました。

お礼日時：2010/10/04 10:44

No.1 回答者： bin_go 回答日時： 2010/10/04 09:35

DATE(YEAR(NOW()),MONTH(NOW()),1)

この回答へのお礼

早々のご回答ありがとうございました。

お礼日時：2010/10/04 10:44