VBAでの勤務時間計算

こんにちは、 ＞頂いたソースを実行してみたのですがうまく動かなかったです。 おかしいですね。私の環境では、うまく行くのですが、 どんなエラーが出ていますか？？ ＞17:00－9:00= 休憩1:00 勤務時間 7:00 こんな感じにも改造しましたけど、このデータを勤務時間を他で利用するときに 不便になると思いますよ。 Public Function ddd(ds As Date, de As Date) As String Dim dd1 As Double Dim dd2 As Double Dim dd3 As Double Dim kyukei As String dd1 = DateDiff("h", ds, de) dd2 = (DateDiff("n", ds, de) Mod 60) / 60# dd3 = dd2 * 60 If (dd1 + dd2 >= 8.5) The

[loca1982]

あとで消す　サンプル