How to open word using excel if not already open?

[Bob Phillips]

I think you need something like

    Set wordApp = GetObject(, "Word.Application")

    If wordApp Is Nothing Then
    
        Set wordApp = CreateObject("Word.Application")
    End If