eugaのプロフィール
@euga euga
ありがとう数1
質問数0
回答数1
- ベストアンサー数
- 1
- ベストアンサー率
- 100%
- お礼率
- 0%
- 登録日2005/03/12
- エクセルVBAで日付計算
Sub test01() x = Date - 38383 '2005/01/31から今日まで何日 x = Format(x, "##") '数字であらわす MsgBox x & "日です。" End Sub 試行錯誤の結果、上記コードで特定の日から今日まで何日かわかるようになりましたが、とても不細工なコードだと思います。 もっとすんなりもとめるにはどうすればよいでしょうか？