Thread: [Solved] Bold Content Control Placeholder
View Single Post
 
Old 10-14-2019, 09:14 PM
gmayor's Avatar
gmayor gmayor is offline Windows 10 Office 2016
Expert
  
Join Date: Aug 2014
Posts: 4,105
gmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud of
Default
Quote:
Originally Posted by gmaxey View Post
Graham's method may work but it will effect the typed text as well
Actually it doesn't appear to in my tests (admittedly not exhaustive), but if you remove the text entered into the control it does not revert to showing the bold placeholder.

You could get round that with a macro

Code:
Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
    If ContentControl.Title = "myContentControl" Then
        If ContentControl.ShowingPlaceholderText = True Then
            ContentControl.Range.Font.Bold = True
        End If
    End If
End Sub
You could add an Else branch to set the font to normal weight if required.
__________________
Graham Mayor - MS MVP (Word) (2002-2019)
Visit my web site for more programming tips and ready made processes www.gmayor.com
Reply With Quote