Excel VBA Progr

Question

I need a little help.

I have an Excel VBA progam that gets an "Automation Error (Error440)" when my program comes to this first line code. Earlier in the program, I have the following declaration:

Dim AcroApp As Object

Dim acroDoc1 As Object

Dim acroDoc2 As Object

Dim acroDoc3 As Object

The problem line of code is this first line:

Set AcroApp = CreateObject("AcroExch.App")

Set acroDoc1 = CreateObject("AcroExch.PDDoc")

Set acroDoc2 = CreateObject("AcroExch.PDDoc")

Set acroDoc3 = CreateObject("AcroExch.PDDoc")

The program worked before but not now. I researched it a little online and a solution was to update my Microsoft Office 365. I have done this.

Any help would be appreciated.

Thanks