如何在新创建时立即停止Word文档

时间:2013-03-08 18:34:39

标签: vb.net visual-studio-2010 vba word-2007

我有一个VS2010 Vb.net程序,可以创建Word 2007文件。

我的Normal.dot文件是自定义的,它为我提供了一个带按钮的新选项卡,当按下这些按钮时,它会通过Normal.dot程序中的VBA执行特定的操作。

这一切都很好,但是,我现在想要添加一些功能,而一旦创建新的Word文档,它就会编辑Outlook中的任务。

我已编辑了2个“本文档”程序,您可以在附带的屏幕截图中看到我的Normal.Dot文件。

My Normal.Dot template

当我运行我的VB.Net程序来创建一个全新的Word 2007文档时,程序不会停留在任何一个消息框上,它只是继续并像以前一样打开Word文档,我的代码在下面,是什么我做错了?!?

    'Open or Create Word document for Editing

    myNewsLetter = myFolder + myLeague + "News" + mySession + ".doc"

    If File.Exists(myNewsLetter) Then
        'do nothing
    Else
        myTemplate = myTempFolder + "NL Skeleton.doc"
        File.Copy(myTemplate, myNewsLetter)
        Create_Blank_Newsletter()
    End If

    'Open Word Newsletter, or switch to it if it's already open

    Dim myFileOpen As Boolean

    myFileOpen = IsFileOpen(myNewsLetter)

    If myFileOpen = False Then
        MSDoc = MSWord.Documents.Open(myNewsLetter)
    End If

    MSWord.WindowState = Word.WdWindowState.wdWindowStateNormal
    MSWord.Visible = True
    MSWord.ActiveDocument.Bookmarks("\StartOfDoc").Select()

1 个答案:

答案 0 :(得分:0)

好的,排序了这个,可以在这里找到完整的讨论...... http://www.vbaexpress.com/forum/showthread.php?p=286771#post286771

基本上,我没有创建新文档,我正在通过Copy创建一个新文档,然后打开现有文档!!!