Error 91: object variable or with block variable not set

[sahitya sidda]

"Error 91: object variable or with block variable not set"

I am getting the above error while retrieving the index of selected row in listview.

Please help me out

Private Sub ListPersons_DblClick()
 
Dim row As Integer
Dim item As ListItem
Dim personid As Double
Dim bsuccess As Boolean
Dim msName As String
 
 
'Listpersons is the name of listview
row = ListPersons.SelectedItem.index
personid = ListPersons.ListItems(row)
 
End Sub

Or can anyone suggest any other method for retrieving the index of selecteditem in listview?

[hariharanmca]

Error 91 ...

Search for your query first and post new. Because here many post in same
topic. Anyhow change

you have to create 'New' instance for an object.

Dim item As ListItem

to

Dim item As New ListItem

Where are you using this item in this method?

personid = ListPersons.ListItems(row).Text

or

personid = ListPersons.ListItems(row).Subitem(<Column_Index>)

[Killer42]

Could this simply indicate that no item is currently selected? (I'm not very familiar with the ListView control.)

[hariharanmca]

Could this simply indicate that no item is currently selected? (I'm not very familiar with the ListView control.)

Yes, Thanks for the pick up.

if the Listview don't have any item and if you select the list view, it'll show this error.

[QVeen72]

Hi,

to check if any Item in List is selected or not :

Dim TItem As ListItem
If lvw.SelectedItem.text <> "" Then
   Set TItem = lvw.SelectedItem
End If
 

Regards
Veena