I have some vba code running in outlook 2007. This code successfully writes a series of contact fields out to a nominated excel spreadsheet. the code snippet that does this for a user defined field is:

Set rng = wks.Cells(i, j)
If itm.UserProperties("ChequeNo") <> "" Then
rng.Value = itm.UserProperties("ChequeNo")
End If
j = j + 1

What I want to be able to do after writing the current value out to excel, is to empty the field in outlook. I have tried all sorts of code within the if...endif block, but cannot get it to work. You will gather that I am very much beginner. Can anyone help please

Mike Ch