Excel Useform: как скрыть приложение, но значок на панели задач (Бит 64)

Question

Как я могу скрыть приложение Excel и добавить значок в системном трее для пользовательской формы? Я видел, что есть предыдущий код для этого, но я не могу заставить его работать. Может ли кто-нибудь помочь мне с этой проблемой. Спасибо всем

Это код , на который я смотрю, и мне трудно применить этот код. Ошибка всегда появляется каждый раз, когда я запускаю макрос

Ошибка компиляции: Несоответствие типов

и это происходит из этой части кода

Private Sub AddIcon()
'Add an icon on the titlebar
    Dim hWnd As Long
    Dim lngRet As Long
    Dim hIcon As Long
    hIcon = Sheet1.Image1.Picture.Handle
    hWnd = FindWindow(vbNullString, Me.Caption)
    lngRet = SendMessage(hWnd, WM_SETICON, ICON_SMALL, ByVal hIcon)
    lngRet = SendMessage(hWnd, WM_SETICON, ICON_BIG, ByVal hIcon)
    lngRet = DrawMenuBar(hWnd)
End Sub

выделенная часть была такой hWnd = FindWindow(vbNullString, Me.Caption)