excel - 日付/時刻の減算を Excel で実行する方法

Question

から日を減算する数式を Excel で設定しようとしています4/29/2013 16:00が、常に時刻をに保ち6:00:00 PMます。私はこの式を見つけました：

=DATE(YEAR(B2),MONTH(B2),DAY(B2)-3)

日を減算しますが、を返します4/26/2013 00:00。00:00時間 ( ) を常ににしたい18:00。誰かがこれを達成する方法を教えてもらえますか?

score 1 · Accepted Answer

最も簡単な方法は、TimeValue("18:00") または 0.75 (18/24) を数式に追加することです。3 日を引くことも算術演算の場合があります。

=TRUNC(NOW())-3 + 0.75

score 0 · Accepted Answer

DateAddVBA では、次の関数を使用できます。

Sub DateChange()
Dim originalDate as Date
Dim newDate as Date

originalDate = "4/29/2013 16:00"
newDate = DateAdd("d", -3, originalDate)

MsgBox newDate,vbInformation

End Sub

または、カスタム関数を記述して DateAdd 関数を概算し、シートで使用できるようにすることもできます。

Public Function wsDateAdd(interval As String, number As Double, myDate As Date)
'function to make 'DateAdd' VBA function available on worksheet.'

Dim newDate As Date

Select Case LCase(interval)
    Case "y", "m", "d", "h", "n", "s" 'years-months-days-hours-minutes-seconds'
        newDate = DateAdd(interval, number, myDate)
    End Select

wsDateAdd = newDate
End Function

前：

方式...