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

質問

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

回答No.2

chupark · ベストアンサー

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

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

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

とかでしょうか。

お礼

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

回答No.1

bin_go

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

お礼

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