指定の日付をシリアル値で表示します

---

指定の日付をシリアル値で表示します

指定の日付をシリアル値にしてA1のセルに入力します。

Sub Sample73()
Range("A1").Value = DateSerial(2015, 12, 31)
End Sub

エクセルＶＢＡテクニック集トップ

---