Windows 10 - Excel 2016/365
Я пытался использовать 64-битный код VBA, опубликованный Сезаром Мэдсом по адресу Ссылка
Проблема в том, что я получаю ошибку компиляции Type Mismatch с параметром ByVal в строке Private Sub AddIcon()
lngRet = Class1.SendMessage(hWnd, WM_SETICON, ICON_SMALL, ByVal hIcon)
(я добавил Class1., Поскольку по какой-то причине (?) Функции не обнаруживаются / не обнаруживаются, хотя я не знаю, почему это необходимо)
Это может быть связано с конфликтом с функцией Mouse Scroll, которую я использую от Кристиана Бьюза, которую можно найти по адресу https://github.com/cristianbuse/VBA-UserForm-MouseScroll, которая также использует параметр ByVal, но который работает нормально сам по себе - без функции Icon, которую я сейчас пытаюсь добавить в форму, которую разрабатываю.
Я признаю, что был новичком в VBA, но учусь быстро благодаря помощи, доступной здесь.
Любой совет или руководство приветствуется и высоко ценится.
Slàinte Mhath!