Hi, I am trying to refesh all the tab in the TOC. I think that this code works. However I have no idea of knowing if it actually work. Public Function contentsRefresh() Dim pmxdoc As IMxDocument Set pmxdoc = ThisDocument Dim pContentView As IContentsView Dim pCountView As Long pCountView = pmxdoc.ContentsViewCount For i = 0 To pCountView - 1 Set pContentView = pmxdoc.contentsView(i) pContentView.Refresh (i) Next i End Function If somebody could help me debug this it would be greatly appreciated. Cordially,
... View more