Word-Dokument per Code erstellen II

static void CreateWordFile(Args _args)
{
    COM wordApplication;
    COM wordDocuments;
    COM wordDocument;
    COM wordRange;
    COM wordSelection;
    COM wordStyles;
   
    #define.Heading1(-2)
    #define.Heading2(-3)
    #define.Heading3(-4)
    #define.Heading4(-5)
    #define.Heading5(-6)   
   
    void insertHeader(str _str, int _level)
    {
        COM wordStyle;
        wordSelection = wordApplication.selection();

        switch( _level )
        {
            case 1:
                wordStyle = wordStyles.item(#Heading1);
                break;
            case 2:
                wordStyle = wordStyles.item(#Heading2);
                break;
            case 3:
                wordStyle = wordStyles.item(#Heading3);
                break;
            case 4:
                wordStyle = wordStyles.item(#Heading4);
                break;
            case 5:
                wordStyle = wordStyles.item(#Heading5);
                break;
            default:
                wordStyle = wordStyles.item(#Heading3);
        }       
       
        wordSelection.style(wordStyle);

        wordSelection.TypeText(_str);

        wordSelection.TypeParagraph();
    }   
   
    wordApplication = new COM("word.application");
    wordApplication.visible(TRUE);
    wordDocuments = wordApplication.Documents();
    wordDocument = wordDocuments.add();
    wordDocument.saveas(@"c:\temp\LoremIpsum.doc");
    wordDocument.activate();

    wordStyles = wordDocument.styles();

    wordRange = wordDocument.range(0,0);   
   
    // Let's go
    insertHeader("Lorem ipsum", 1);
    wordSelection.TypeText("Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut labore et dolore magna aliquyam");
    wordSelection.TypeParagraph();
   
    insertHeader("Lorem ipsum", 2);
    wordSelection.TypeText("Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut labore et dolore magna aliquyam");
    wordSelection.TypeParagraph();
   
    wordSelection.TypeText("Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut");
    wordSelection.TypeParagraph();
   
    // Finish
    wordDocument.save();
    wordDocument.close();
    wordApplication.quit();   

}