Caros, possuo codigo abaixo, para executar a macro no determinado horario, porem como faço para agendar com data?

Exemplo no dia 23/02/2016 as 08:00:00, executar a macro.
é possível determinar datas e horarios juntos para execução?

 Public Sub TesteOnTime()
    Dim time As Date
    Dim resposta As Integer
    
    Application.Goto ActiveWorkbook.Sheets("Auxiliar").Cells(21, 2)
    time = [O15]
        
    resposta = MsgBox("Agendar a Tarefa para executar as: " & time & "?", vbYesNo + vbQuestion, "Agendar Tarefa")
    If resposta = vbNo Then
    
    MsgBox ("Ok, cancelado"), vbInformation
   
    Else
       
   Call Application.OnTime(TimeValue(time), "ExecutaOnTime")
   
    End If

End Sub 

Obrigado.