Brug af Restrict metoden til at filtrere mængden af mails i en oversigt.

Hej
Jeg vil gerne filtrere en oversigt, så en række mails skjules. Jeg har følgende kodestump:

Dim oItms As Outlook.Items
  Dim oResItems As Outlook.Items
  Dim sFilter As String
  Dim oItm As Outlook.ContactItem
  Dim myNamespace As NameSpace
  Set myNamespace = Application.GetNamespace("MAPI")
    Set Application.ActiveExplorer.CurrentFolder = myNamespace.GetDefaultFolder(olFolderSentMail)
  Set oItms = ActiveExplorer.CurrentFolder.Items
   
    sFilter = "[Receivedtime] > '" & (Date - 1) & "'"

  Set oResItems = oItms.Restrict(sFilter)
  MsgBox oResItems.Count
     
  Set oItm = Nothing
  Set oItms = Nothing
    Application.ActiveExplorer.CurrentFolder.Display
    Application.ActiveExplorer.Activate

En del af det er kopieret fra eksempler på nettet. Filteret virker sådan set fint, forstået på den måde at min msgbox viser det rigtige antal, men selve mappen viser samtlige mails. Det er altså alene viewet som ikke er korrekt.

Hvad er der galt?

Det er lavet på Office 2003 sp3

/Torben