shige
2019/03/07 (木) 09:24:48
d1a4b@b63e8
こちらこそ、後押しありがとうございます
テーブル設計に何となく不安があったのですが、本日より作成にかかろうと思います
最初の質問は編集可能でしたがレスの編集が分からなかったのでテストさせて頂きます(汗
確かに、かなり見やすくなってますね!
掲示板とかHTML?は全然分からないので板汚す可能性大です
この下が囲われる??
Function tuki(day1, day2 As Date)
’使い方 tuki([入社日],[退社日]) tuki([入社日],date())
Dim i As Long
If (Format(day1, "dd") < Format(day2, "dd")) Then
i = DateDiff("m", day1, day2)
Else
i = DateDiff("m", day1, day2) - 1
End If
tuki = i
End Function
通報 ...