Remove the date from the formula.

[shophoney]

Hi, below i have a formula. I need to make the date and time relative. I have a slicer that pulls in today's date. And I have a cell that has 10 (am). But I cant seem to separate the formula.

I would like to point to Slicer_TODAY and cell b22 10. But I'm having trouble.

=CUBEVALUE("ThisWorkbookDataModel","[MachineCode].[machine_code].&[" & $C$4 & "]",{"[dCalendar].[DATES].&[2017-10-02T00:00:00]","[SALES TABLE].[TIME (Hour)].&[10]"},"[Measures].[SALES TOTAL NET RETAIL]")


Thanks