Como exportar tarefas do Outlook para o Excel dentro de um intervalo de datas especificado (VBA)

0

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)
    
por BKen 15.11.2016 / 11:21

1 resposta

0

Você insere suas variantes literalmente em seus critérios, em vez de inserir seus valores, para corrigir isso:

"[DueDate] >= '" & strStart & "' AND [DueDate] <= '" & strEnd & "'"

    
por 15.11.2016 / 11:47