Starting Word from EXCEL

[omega66]

Hi guys,

Yet another (most probably) stupid question: is it possible to start WORD from within EXCEL? I know how to operate WORD from EXCEL once WORD is already opened. What I don’t know is - is it possible to launch WORD just by using code in EXCEL?

Thanks guys!

 

[jjsanders]

Does this help you?

Private Sub CommandButton1_Click()
   Dim Word As Word.Application
    Dim strMsg As String
    'strMsg = ActiveSheet.Range("B2") & "_" & ActiveSheet.Range("B3")
    strMsg = ThisWorkbook.Sheets("Testformulier").Range("B2") & "_" & ThisWorkbook.Sheets("Testformulier").Range("B3")
    
  ThisWorkbook.Sheets("Testformulier").Range("A2:F28").Copy

  Set Word = New Word.Application
  
On Error GoTo Finally

  
  Word.documents.Open Filename:="T:\temp\test.doc"
  Word.Selection.EndKey Unit:=wdStory
  Word.Selection.TypeParagraph
  Word.ActiveDocument.PageSetup.Orientation = wdOrientLandscape
  Call Word.Selection.PasteSpecial(Link:=False, DataType:=wdPasteOLEObject, _
    Placement:=wdInLine, DisplayAsIcon:=False)
    
  Word.ActiveDocument.SaveAs "T:\temp\" & strMsg & ".doc"
  MsgBox "De file is opgeslagen", vbInformation
  
  
  
Finally:
  Word.Quit
  Set Word = Nothing
End Sub

 

[omega66]

Sad to say - no. I receive a Compile error: "User-Defined type not defined". Why's that?

Thanks

 

[Wolfshead]

Hi
You need to set project references to Microsoft Word. From the module select Tools, References, and pick out your version of Word (In my case Microsoft Word 11.0 Object Library

Wolfshead

 

[omega66]

Hi
You need to set project references to Microsoft Word. From the module select Tools, References, and pick out your version of Word (In my case Microsoft Word 11.0 Object Library

Wolfshead

Thanks Wolf and jjsanders, will do. Back to work for me.