Using Hittest with more than one Listview Control

[AlexanderBB]

Private Type POINTAPI
    x As Long
    y As Long
End Type

Private Type LVHITTESTINFO
    pt As POINTAPI
    flags As Long
    iItem As Long
    iSubItem  As Long
End Type

Private Const LVM_SUBITEMHITTEST As Long = &H1039
Private Const LVHT_ONITEM        As Long = &HE

Private Declare Function SendMessage Lib "user32" Alias "SendMessageW" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Are there any considerations with using listviews together? Different names and Mouse down events but all using

  Dim hitTest As LVHITTESTINFO
    With hitTest
        .flags = LVHT_ONITEM
        .pt.x = (x) ' \ Screen.TwipsPerPixelX)
        .pt.y = (y) ' \ Screen.TwipsPerPixelY)
    End With

    SendMessage NAME.hWnd, LVM_SUBITEMHITTEST, 0, hitTest

Under some circumstances I haven't fully tracked down yet, Hitest.iItem can incorrectly be -1 or >listitems.count
It is happening when moving items from one list into another. Perhaps on 2nd or Next time.