.Restrict("[Categories]" & filter) werkt niet in andere Outlook

Status
Niet open voor verdere reacties.

Morsyd

Gebruiker
Lid geworden
25 dec 2007
Berichten
165
Hallo,
ik schreef een vba-macro in Outlook (Office 2013) waarbij mails verplaatst worden op basis van categorie.
Dit doe ik met behulp van onderstaande code

Code:
Set myItems = mySourceFolder.Items
Set myRestrictItems = myItems.Restrict("[Categories] = " & "'" & ProjectNummer "'")
For j = myRestrictItems.Count to 1 Step -1
     myRestrictItems(j).Move myDestFolder.Folders(i)
Next

Alles werkt zoals ik het wens...
Nu wil ik dezelfde code op een andere computer, met een iets oudere Outlook (Office 2010).
Daar krijg ik volgende foutmelding bij de lijn "Set myRestrictItems = ..."
Fout -2147352567 (80020009) tijdens uitvoering:
Een criterium is niet geldig.

Ik heb me al suf gezocht op het internet hoe dit komt en waarom dit op de ene pc/outlook wel werkt.
Volgens deze site van Microsoft werkt de Restrict-Method ook perfect met Categories in Office 2010, dus ik vind niet meteen de oplossing.
https://msdn.microsoft.com/en-us/library/office/ff869597(v=office.14).aspx

Kunnen jullie me helpen?

[EDIT]: geen idee of het belangrijke info is: de andere pc is er eentje met Windows Server 2003 (is een interne server); de pc waar het wel werkt is er eentje met Windows 7.
 
Laatst bewerkt:
Geen idee maar wat ik wel in je voorbeeld zie is dat je een dubbele quote mist:
Set myRestrictItems = myItems.Restrict("[Categories]" & ProjectNummer)
 
Geen idee maar wat ik wel in je voorbeeld zie is dat je een dubbele quote mist:
Set myRestrictItems = myItems.Restrict("[Categories]" & ProjectNummer)

Terechte opmerking. Dat is een typfoutje (hier) van mijnentwege, ik gebruik bovendien zelf
Code:
Set myRestrictItems = myItems.Restrict("[Categories] = " & "'" & ProjectNummer "'")
 
Daaruit blijkt dan maar weer het belang van correcte voorbeelden ;)
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan