simonlehmann/Fixit.vb

Created January 26, 2018 02:57

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/simonlehmann/7273ff6014030c731eba83c4900cb32b.js"></script>
Save simonlehmann/7273ff6014030c731eba83c4900cb32b to your computer and use it in GitHub Desktop.

Download ZIP

Fixes Microsoft Word's multilevel numbered heading glitches (https://answers.microsoft.com/en-us/msoffice/forum/msoffice_word-mso_win10-mso_2013_release/word-2013s-heading-numbering-reverting-to-pipe/9129622c-8289-441b-b94f-7f7552acd828)

Raw

	Sub Fixit()
	Dim templ As ListTemplate
	Dim lev As ListLevel
	For Each templ In ActiveDocument.ListTemplates
	For Each lev In templ.ListLevels
	lev.Font.Reset
	Next lev
	Next templ
	End Sub

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment