Você insere suas variantes literalmente em seus critérios, em vez de inserir seus valores, para corrigir isso:
"[DueDate] >= '" & strStart & "' AND [DueDate] <= '" & strEnd & "'"
Problema Eu sou relativamente novo no VBA e atualmente componho um código que extrai todas as tarefas do Microsoft Outlook para uma nova planilha do Excel. Até agora, o código do VBA funciona bem, exceto que não consigo extraí-los somente dentro de uma data especificada pelo usuário.
Especificações Microsoft Outlook / Excel 2010, Windows 7
Aqui está o extrato do código que não funciona:
'VBA MACRO WHICH RUNS IN OUTLOOK
--------------
Dim strStart As Date
Dim strEnd As Date
strStart = InputBox("Enter a start date using the following format MM/DD/YYYY", "Input Required")
strEnd = InputBox("Enter a due date using the following format MM/DD/YYYY", "Input Required")
strQuery = "[DueDate] >= 'strStart' AND [DueDate] <= 'strEnd'"
Set OlkList = Ns.GetDefaultFolder(olFolderTasks).Items.Restrict(strQuery)