Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.
Sub CountNumber_FindOperation Dim rngStory As range Dim i As Long Set rngStory = ActiveDocument.StoryRanges(wdMainTextStory) With rngStory.Find .Font.Bold = True While .Execute i = i + 1 Wend End With If i > 0 Then MsgBox "Occurrences of bold formatting found " & i & " time(s)." Else MsgBox "No bold formatting found", vbOKOnly, "No bold formatting!" End If End Sub
|Message When Opening Word||4||48|
|Getting "Print to File" saving a .prn file on random print jobs from different software when printing to a physical printer shared from print server.||6||72|
|Use a content control to change the fill color of a shape||5||40|
|MailMerge VBA DataSource Connection Issue||10||32|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
6 Experts available now in Live!