Maximize productivity with
30% off* for a limited time
using BOOSTDEV30.
Includes 3- and 5-packs.
*Some exclusions may apply.New Product LaunchBoldDesk: Help desk ticketing software starts at $10 for 3 agents.
Try it for free.
Dim document As WordDocument = New WordDocument("exemple.docx")
Dim bkmkNavigator As BookmarksNavigator = New BookmarksNavigator(document)
bkmkNavigator.MoveToBookmark("numLocalAC1")
Dim cellIndex As Integer = -1
If bkmkNavigator.CurrentBookmark IsNot Nothing AndAlso bkmkNavigator.CurrentBookmark.BookmarkStart IsNot Nothing Then
Dim ownerParagraph As WParagraph = bkmkNavigator.CurrentBookmark.BookmarkStart.OwnerParagraph
If ownerParagraph.IsInCell Then
Dim ownerCell As WTableCell = TryCast(ownerParagraph.OwnerTextBody, WTableCell)
If ownerCell IsNot Nothing Then cellIndex = ownerCell.GetCellIndex()
End If
End If |