VBA automation error in CreateObject("InternetExplorer.Application")

Question

I am getting the an automation error while invoking the following object ``` Set IE = CreateObject("InternetExplorer.Application") ``` The error is showing Run-time error '-2147467259 (80004005)' Automation error Unspecified error Can anyone have any idea why this is occuring 'moved code from comments ``` Sub TableExample() Dim IE As Object Dim doc As Object Dim strURL As String strURL = Range("B2").Value Set IE = CreateObject("InternetExplorer.Application") With IE ' .Visible = True .navigate Range("B2").Value Do Until .readyState = 4 DoEvents Loop Do While .Busy DoEvents Loop Set doc = IE.document GetAllTables doc .Quit End With End Sub ```

Accepted Answer

I just wasted 4 hours on this, and I'm facepalming at how easy the solution was. Excel creates a new activeX instance every time you run the line:

```
Set IE = CreateObject("InternetExplorer.Application")
```

How exactly that works is out of my league, but those references stick around even after you restart excel. After a couple dozen pile up, excel runs out of memory to make more

Restart your computer, (probably an easier way, but that worked for me) and then stick the line

```
IE.Quit 
```

at the end of your code

VBA automation error in CreateObject("InternetExplorer.Application")

Solution

Problem