Your document is very poorly constructed. Everything is in the Normal Style, with brute-force formatting to override it. Aside from the fact that increases the likelihood of document corruption, it makes attaining any level of formatting consistency much harder than it need be.
For an idea of the way such formatting should be done, see my post here:
excel - VBA TypeText Word Wrapping inline with previous line's indentation - Stack Overflow
For some code to convert manual numbering to auto-numbering, see also:
Convert outline to a multilevel list - Eileen's Lounge