expression.Bookmark
expression Required. An expression that returns a Discussion object.
Example
This example sets the specified discussion's bookmark to "Supplies".
Dim dscDiscussions As Discussions
Set dscDiscussions = OpenDiscussions("http://samples.microsoft.com")
dscDiscussions(1).Discussions(3).Bookmark = _
"Supplies"