Функция Excel IF с объявленным значением в VBA

Question

У меня есть файл, в котором мне нужно определить результат с помощью функции IF (мне нужно поместить формулу с VBA). Мой код выглядит как показано ниже, однако я не могу это сделать.

Dim WB1, ATB, Prod As Workbook
Dim Ws1, Ws2 As Worksheet
Dim Cnt1, Cnt2 As Long
Dim i, j As Long
Dim Hname As String
Dim Bdate As Variant


Set WB1 = ThisWorkbook
Set Ws1 = WB1.Sheets("Home")
Set Ws2 = WB1.Sheets("Control")
Set Ws3 = WB1.Sheets("RAW DATA")

    Bdate = InputBox("Input date in mm/dd/yyyy format")
    Bdate = Format(Bdate, "mm/dd/yyyy")
Ws3.Range("AF2").FormulaR1C1 = "=IF(RC[-22]<DATEVALUE(""07/01/2019""),""<07/01/2019"","">=07/01/2019"")"

Мне нужно заменить значение 07/01/2019 на Bdate .

спасибо за вашу помощь!