Microsoft officeのWordVBAでマクロを組みましたので公開します。
インターネットで検索したり、マクロの記録機能を使ったりしたのを組み合わせだけなので、上手くはないですが、一応動くはずです。
office2021です。
必ず、元データのバックアップを取ってから実行してください。
素人の作ったものなので、信用しすぎないでください。

［コード］

Sub 節タイトル変更と目次作成()
    Dim doc As Document
    Dim para As Paragraph
    
    Selection.HomeKey Unit:=wdStory

    ' ワード文書を設定
    Set doc = ActiveDocument
    
    ' 半角数字から始まる段落を見つけてスタイルを設定
    For Each para In doc.Paragraphs
        If para.Range.Words(1).Characters(1).Text Like "[0-9]" Then
            para.Style = "見出し 1"
            para.Range.Font.Name = "BIZ UDPゴシック"
            para.Range.Font.Size = 12
        End If
    Next para
    
    Selection.EndKey Unit:=wdStory
    
    ' 目次を作成
    doc.TablesOfContents.Add Range:=Selection.Range, _
        RightAlignPageNumbers:=True, _
        UseHeadingStyles:=True, _
        IncludePageNumbers:=True, _
        AddedStyles:="見出し 1"
End Sub