Необходимо выполнить позднюю привязку для библиотеки объектов Microsoft Outlook, поскольку, как и здесь, у вас есть более ранняя библиотека, чем та, с которой был написан код. Используя позднее связывание, Excel будет искать нужную библиотеку.
Снимите флажок с отсутствующей ссылки.
Замените часть кода, имеющую ссылки на outlook, на этот (пример) ...
Dim objApp As Object
Dim objMailItem As Object
Const olMailItem As Long = 0 'Outlook Mail Item constant
Set objApp = CreateObject("Outlook.Application")
Set objMailItem = objApp.CreateItem(0)
With objMailItem
.To = strTo
.CC = strCC
End With