1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:

   With ListGalleries(wdOutlineNumberGallery).ListTemplates(1).ListLevels(1)
        .NumberFormat = "%1."
        .TrailingCharacter = wdTrailingTab
        .NumberStyle = wdListNumberStyleArabic
        .NumberPosition = CentimetersToPoints(0)
        .Alignment = wdListLevelAlignLeft
        .TextPosition = CentimetersToPoints(0.63)
        .TabPosition = wdUndefined
        .ResetOnHigher = 0
        .StartAt = 1
        With .Font
            .Bold = wdUndefined
            .Italic = wdUndefined
            .StrikeThrough = wdUndefined
            .Subscript = wdUndefined
            .Superscript = wdUndefined
            .Shadow = wdUndefined
            .Outline = wdUndefined
            .Emboss = wdUndefined
            .Engrave = wdUndefined
            .AllCaps = wdUndefined
            .Hidden = wdUndefined
            .Underline = wdUndefined
            .Color = wdUndefined
            .Size = wdUndefined
            .Animation = wdUndefined
            .DoubleStrikeThrough = wdUndefined
            .Name = ""
        End With
        .LinkedStyle = ""
    End With					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:

var level = ListGalleries(wdOutlineNumberGallery).ListTemplates(1).ListLevels(1);
level.NumberFormat = "%1.";
level.TrailingCharacter = wdTrailingTab;
level.NumberStyle = wdListNumberStyleArabic;
level.NumberPosition = CentimetersToPoints(0);
level.Alignment = wdListLevelAlignLeft;
level.TextPosition = CentimetersToPoints(0.63);
level.TabPosition = wdUndefined;
level.ResetOnHigher = 0;
level.StartAt = 1;
level.Font.Bold = wdUndefined;
level.Font.Italic = wdUndefined;
level.Font.StrikeThrough = wdUndefined;
level.Font.Subscript = wdUndefined;
level.Font.Superscript = wdUndefined;
level.Font.Shadow = wdUndefined;
level.Font.Outline = wdUndefined;
level.Font.Emboss = wdUndefined;
level.Font.Engrave = wdUndefined;
level.Font.AllCaps = wdUndefined;
level.Font.Hidden = wdUndefined;
level.Font.Underline = wdUndefined;
level.Font.Color = wdUndefined;
level.Font.Size = wdUndefined;
level.Font.Animation = wdUndefined;
level.Font.DoubleStrikeThrough = wdUndefined;
level.Font.Name = "";
level.LinkedStyle = "";					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:

// Neue WordApplikation erstellen
Microsoft.Office.Interop.Word.Application wordApplication = new Microsoft.Office.Interop.Word.Application();

// Erstelle neues Worddokument
Microsoft.Office.Interop.Word._Document wordDocument = null;
// Öffne Worddokument
wordDocument = wordApplication.Documents.Open(ref fileName, ref missing, ref missing, ref missing,
                                              ref missing, ref missing, ref missing,
                                              ref missing, ref missing, ref missing,
                                              ref missing, ref missing, ref missing,
                                              ref missing, ref missing, ref missing);

// Inhaltsverzeichnis wird erstellt
TableOfContents toc = wordDocument.TablesOfContents.Add(wordDocument.Application.Selection.Range,
                                                     ref UseHeadingStyles,
                                                     ref UpperHeadingLevel,
                                                     ref LowerHeadingLevel,
                                                     ref missing,
                                                     ref missing,
                                                     ref RightAlignPageNumbers,
                                                     ref IncludePageNumbers,
                                                     ref missing,
                                                     ref UseHyperlinks,
                                                     ref HidePageNumbersInWeb,
                                                     ref UseOutlineLevels);
wordApplication.ActiveDocument.TablesOfContents[1].TabLeader = WdTabLeader.wdTabLeaderDots;
wordApplication.ActiveDocument.TablesOfContents.Format = WdTocFormat.wdTOCClassic;


//Hier ist die Formatierung
object oName = "Normal.dotm";
wordApplication.ActiveDocument.ListTemplates.get_Item(ref oName).ListLevels[1].NumberFormat = "%1";
wordApplication.ActiveDocument.ListTemplates.get_Item(ref oName).ListLevels[1].TrailingCharacter = WdTrailingCharacter.wdTrailingTab;
wordApplication.ActiveDocument.ListTemplates.get_Item(ref oName).ListLevels[1].NumberStyle = WdListNumberStyle.wdListNumberStyleArabic;
wordApplication.ActiveDocument.ListTemplates.get_Item(ref oName).ListLevels[1].NumberPosition = 0;
wordApplication.ActiveDocument.ListTemplates.get_Item(ref oName).ListLevels[1].Alignment = WdListLevelAlignment.wdListLevelAlignLeft;
wordApplication.ActiveDocument.ListTemplates.get_Item(ref oName).ListLevels[1].TextPosition = zahl;
wordApplication.ActiveDocument.ListTemplates.get_Item(ref oName).ListLevels[1].ResetOnHigher = 0;
wordApplication.ActiveDocument.ListTemplates.get_Item(ref oName).ListLevels[1].StartAt = 1;

// Hier soll eine Überschrift mit Nummerierung erstellt werden
headingType = WdBuiltinStyle.wdStyleHeading2;
wordApplication.Selection.set_Style(ref headingType);
wordApplication.Selection.Font.Name = "???";
wordApplication.Selection.Font.Size = 14;
wordApplication.Selection.Font.Color = WdColor.wdColorBlack;
wordApplication.Selection.TypeText(_strObjektArray[i]);
wordApplication.Selection.Range.Paragraphs.OutlineLevel = WdOutlineLevel.wdOutlineLevel1;
wordApplication.Selection.TypeParagraph();

toc.Update();