View Single Post
 
Old 01-26-2022, 04:20 PM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2016
Expert
 
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 4,176
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default

Tag the product specific sections by putting them in Rich Text (or plain text) Content Controls. Use either the Title or Tag properties for each of these CCs to show what product the section relates to.

Then you can use a macro to quickly show/hide or permanently remove the CCs chosen as not relevant. A basic example of this is shown below
Code:
Sub ShowMe()
  Dim aCC As ContentControl
  For Each aCC In ActiveDocument.ContentControls
    If aCC.Title = "A" Then
      aCC.Range.Font.Hidden = False
    Else
      aCC.Range.Font.Hidden = True
    End If
  Next aCC
End Sub
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote