QuickBooks – Due to the following errors, the COM class factories with CLSID {6C9E80E3-B780-4361-A693-5E5C6BDC83A9} is defeated: 80040154

I received this error:
Due to the following error, the retrieval of the COM factory for the component with CLSID {6C9E80E3-B780-4361-A693-5E5C6BDC83A9} failed: 80040154.

Dim smgrGlobal As QB