今日の日付を入力法3種

今日の日付を3種類の方法で入力します。

date関数を使用して

1）セルに「###」と表示される場合

　　ActiveCell.Value = Date ‘###　　

２）自動的にセル幅が拡張されて、日付がすべて表示される場合
　　ActiveCell.Value = Date
　　ActiveCell.NumberFormatLocal = “ggge年m月d日”
　　’列幅が広がり表示される　

３）隣接するセルが空白の場合、はみ出して表示される場合
　　ActiveCell.Value = Format(Date, “ggge年m月n日”)
　　’列幅をはみ出して表示される　　　

以上3種の方法をやってみます。