Please anyone, how can I open a word document from VB ???

This code don't work :(

Dim MyAppID, ReturnValue
AppActivate "Microsoft Word"    ' Activate Microsoft Word.

I want VB to find Word itself without me telling the path !
It's not all people who have the same path !

--
----------------------
mailto:s...@online.no
----------------------

Reply

The following code creates a document and record its creation date.

Sub CreateDoc()
    Dim WordObj As Word.Application
    Dim WordDoc As Word.Document
    Dim WordRng As Word.Range
    Dim WordPar As Word.Paragraph
    Set WordObj = CreateObject("Word.Application")
    With WordObj
        .WindowState = wdWindowStateMaximize
        .Documents.Add
        Set WordDoc = WordObj.ActiveDocument

        Set WordRng = WordDoc.Range
        With WordRng
            .Font.Bold = True
            .Font.Italic = True
            .Font.Size = 16
            .InsertAfter "Running Word From Access Using Automation"
            .InsertParagraphAfter
            'Insert a blank paragraph between the two paragraphs
            .InsertParagraphAfter
        End With
        Set WordPar = WordRng.Paragraphs(3)

        With WordPar.Range
            .Bold = True
            .Italic = False
            .Font.Size = 12
            .InsertAfter "Report Created:  "
            .Collapse Direction:=wdCollapseEnd
            .InsertDateTime DateTimeFormat:="MM-DD-YY HH:MM:SS"
        End With
        .ActiveDocument.SaveAs "c:\My Documents\autCreateDate.Doc"
        .Quit
    End With
End Sub

Reply

Stig <s...@online.no> wrote in article <33B90272....@online.no>...

Simple huh?
-tom

Reply

Stig <s...@online.no> wrote in article <33B90272....@online.no>...

The program which is associated with this file type will automatically be
launched.

The path to the program is registered in the registry.

Ole automation works well, but is slows down your application.

Reply