Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
If you are using the code from here (http://puremis.net/excel/code/063.shtml), the Image picture MUST be an Icon file (.ICO). Using any other format will result in nothing.
The code to use is this....
Dim hWnd As Long
Dim lngRet As Long
Dim hIcon As Long
hIcon = Sheet1.Image2.Picture.Hand
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)
This doesn't actually change the TaskBar Icon directly, but changes the Forms icon, which is reflected in the taskbar.
Regards,
Wayne