VB6 ActiveX DLL не работает в Экселе

Формулировка задачи:

Хочу создать в VB6 DLL библиотеку, чтобы использовать ей в Экселе. Создал простую DLL'ку c одним классом и одним методом в нём. В экселе на машине с установленным VB6 (Windows XP) библиотека нормально цепляется, экземпляры класса создаются, метод вызывается.
Однако когда пытаюсь её использовать на другой машине (Windows 10 x64, Office 2010 x64), то получаю ошибку:

ActiveX component can't create object

Запускал regsvr32, но получал такую ошибку:

The module C:\Temp\Project1.dll was loaded but the call to DllRegisterServer failed with error code 0x80004005

Что надо сделать, чтоб всё заработало?

Решение задачи: «VB6 ActiveX DLL не работает в Экселе»

textual
                            Листинг программы 
                        
                            Public Declare PtrSafe Function GetDesktopWindow Lib "USER32" () As LongPtr