Элемент ListView, в i-той строке, если 3-ий ListSubItem содержит не дату, то отсутствует 4-ый ListSubItem
Вот так работает:

            If IsDate(Me.LV.ListItems(i).ListSubItems(3)) Then
                Debug.Print Me.LV.ListItems(i).ListSubItems(4)
            Else
                Debug.Print "нету"
            End If

а вот так:

Debug.Print IIf(IsDate(Me.LV.ListItems(i).ListSubItems(3)), Me.LV.ListItems(i).ListSubItems(4), "нету")

сразу сообщает про индекс, который out of bounds.

http://www.sql.ru/forum/1101136/iif-kompiliruet-vsyo-vyrazhenie-nezavisimo-ot-togo-kakaya-vetka-budet-vypolnyatsya