MSGBOX (XXXX.GetContent.STRING)

[sibrulotte]

Hi,

is there a reason why this wouldn't work?

SUB maxyear

  set bloc_user = ActiveDocument.Fields("BlocSecteurSponsorProjetPermis").GetPossibleValues

  msgbox (bloc_user.GetContent.string)

  End sub

I know the result. It's a single value actually. I just want to confirm this value but my macro is bugging.

[swuehl]

Try

SUB maxyear

  set bloc_user = ActiveDocument.Fields("BlocSecteurSponsorProjetPermis").GetPossibleValues

  msgbox (bloc_user.Item(0).Text)

End sub