Hello Daniel,
I tried to change the visibility of the trails, but couldn't.
There are undocumented APIs such as PublicationTweak or PublicationTrailSegment.
I found that PublicationTrailSegment.Visible is related to the visibility of the Trail, but it seems to be read-only.
Sub ChangeAllTrailVisibility(Optional showTrail As Boolean = True)
Dim oPrDoc As PresentationDocument
Set oPrDoc = ThisApplication.ActiveDocument
Dim oBNs As BrowserNodesEnumerator
Set oBNs = oPrDoc.BrowserPanes(1).TopNode.BrowserNodes(1).BrowserNodes(2).BrowserNodes
Dim oBN As BrowserNode
For Each oBN In oBNs
If TypeOf oBN.NativeObject Is PublicationTweak Then
Dim oPT As PublicationTweak
Set oPT = oBN.NativeObject
Dim oPTSeg As PublicationTrailSegment
For Each oPTSeg In oPT.TrailSegments
' PublicationTrailSegment.Visible can be read.
Debug.Print oPTSeg.Visible
' But we cannot write on it.
'oPTSeg.Visible = showTrail
Next oPTSeg
End If
Next oBN
End Sub
So I think that we cannot change the visibility of the trails.
=====
Freeradical
Hideo Yamada