>Hi,
>
>>
>This code works:
>

>lFound = .F.
>FOR EACH oProp IN oDocument.CustomDocumentProperties
>   IF oProp.Name == "iDocumentID"
>      * Found it. Get out of here
>      lFound = .T.
>      EXIT
>   ENDIF
>ENDFOR
>
>IF lFound
>   iDocID = oProp.Value
>ENDIF
>

>>
>
>But this doesn't:
>

>lFound = .F.
>oColl = CREATEOBJECT("Collection")
>oColl.ADD(CREATEOBJECT("line"))
>oColl.ADD(CREATEOBJECT("line"))
>oColl.ITEM(2).COMMENT = "Me"
>
>FOR EACH oObj IN oColl
>  IF oObj.COMMENT ="Me"
>    lFound = .T.
>    EXIT
>  ENDIF
>ENDFOR
>
>IF lFound
>  ? oObj.COMMENT
>ENDIF
>

>
>Is oDocument.CustomDocumentProperties a VFP collection ?
>

No, CustomDocumentProperties is an Office object. The example was meant to show that the loop variable had scope outside the loop.

I know there are some issues with FOR EACH.

Tamar