Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: dbthj
  • Order by date
  1. dbthj

    Normal.dot aggravating Message When Closing Word Doc

    That does it. Perfect. Thanks. To assemble the pieces, then, this is the whole script to open 3 Word documents without getting Normal.dot messages. On Error Resume Next Set objWord = GetObject(, "Word.Application") If Err.Number <> 0 Then Err.Clear Set objWord =...
  2. dbthj

    Normal.dot aggravating Message When Closing Word Doc

    PHV, I don't follow what all that does, but it is an improvement. The only drawback is that it opens the documents as minimized. I have to look for them in the taskbar. Do you know how to open them completely?
  3. dbthj

    Normal.dot aggravating Message When Closing Word Doc

    GrimR, This was worth trying. But no cigar, yet. I tried your example, exactly as you wrote it. ' Open these Word documents.. Set objWord = CreateObject("Word.Application") objWord.Visible = True objWord.Documents.Open "C:\Testing\Test1.DOC" objWord.Documents.Open "C:\Testing\Test2.DOC"...
  4. dbthj

    Normal.dot aggravating Message When Closing Word Doc

    Perhaps. This happens if another Word doc is open. It doesn't matter how it got openned. Might have been clicked on, rather than openned in a script. At any rate, any open Word doc has a handle on Normal.Dot which is some sort of a Microsofty template thingy. You can open as many as you...
  5. dbthj

    Normal.dot aggravating Message When Closing Word Doc

    The standard vbscript suggestion for opening a Word doc (in fact one of the FAQs on this forum suggests this) is something like this: dim wapp dim wWord dim Visible set wApp = createobject("Word.application") wApp.visible = true set wWord = wApp.Documents.Open...

Part and Inventory Search

Back
Top