Keyword fields in Contact

  • Thread starter Thread starter Chris W
  • Start date Start date
C

Chris W

I'm working with a field that's the Keyword type and I'm
having problems when I try to write VBA to export the
contact record. this is the code that I'm using:
'this works if the field is Text type
Set objectsvalue1 = itm.UserProperties.Find("region")
If objectsvalue1 <> "" Then
rng.Value = objectsvalue1.Value
End If

'same code for the field of Keyword type
Set objectsvalue2 = itm.UserProperties.Find
("Contacttype1")
If objectsvalue2 <> "" Then
rng.Value = objectsvalue2
End If

but when it gets to the IF objectsvalue2 <> "" line is
when I get an error 13. I've tried using IS NULL or IS
EMPTY and I get the same results.

Any ideas?
Thanks,
Chris
 
Back
Top