ListView Question

[jdlc]

See attached.

this is wonderful! thanks a lot vbaInet.

i just modified a bit, because when i tried to resize the listview window until it shows only three items out of ten, the window didn't scroll though the item is highlighted, what i did is this:

Private Sub txtSearch_Change()
    If Len(Me.txtSearch.Text & vbNullString) <> 0 Then
        With rs
            .FindFirst "Forename LIKE '*" & Me.txtSearch.Text & "*'"
            If Not .NoMatch Then
                lvSrch.ListItems(.AbsolutePosition + 1).Selected = True
                [COLOR=blue]' ************* i add this line **************[/COLOR]
[COLOR=blue]               lvSrch.ListItems(.AbsolutePosition + 1).EnsureVisible[/COLOR]
[COLOR=blue]               '***************************************[/COLOR]
            End If
        End With
    End If
End Sub

and it works fine, again thanks a lot.

 

[vbaInet]

You're welcome!

 

[jdlc]

You're welcome!

till next time boss.

 

[vbaInet]

till next time boss.

Sure master

 

[jdlc]

Sure master

hi vbaInet, i don't know what i did, i just copy all the codes you provided to me, but it seems it doesn't work with my form. can you please enlightened me. i'm attaching the db. thanks

 

[jdlc]

hi vbaInet, i don't know what i did, i just copy all the codes you provided to me, but it seems it doesn't work with my form. can you please enlightened me. i'm attaching the db. thanks

don't worry boss, i found the problem, i uncheck the hide selection in the listview properties. and it's working fine.

 

[vbaInet]

I was just opening your db when you posted. Well, there you go, one of those properties you forgot to untick.

By the way, I don't think you need the API anymore because FullRowSelect should do it.

 

[jdlc]

I was just opening your db when you posted. Well, there you go, one of those properties you forgot to untick.

By the way, I don't think you need the API anymore because FullRowSelect should do it.

it's so funny, because i finished two sticks of cig before i found what caused the problem. anyways going back to API where should I put the FullRowSelect?

 

[vbaInet]

You have it already in your code, i.e. the Open event. So comment out all the API stuff.

 

[jdlc]

You have it already in your code, i.e. the Open event. So comment out all the API stuff.

yup i quote it, and it work the same.

whew! that's a nice piece of work.

thanks.

 

[vbaInet]

You're welcome

 

[jdlc]

You're welcome

hi vbainet, me again boss.

i try to run the db in 2010 version and it seems the itemclick event doesn't firing, i read this in microsoft community ]http://answers.microsoft.com/en-us/office/forum/office_2010-access/listview-issue-in-access-2010/d0b6f86a-1d9c-4d7f-8566-b80a10bb67c6 and they mentioned about mscomctl.ocx, i did try to change the object with 2010 listview but nothing happened, did you encounter this problem?

 

[vbaInet]

I'm running 2010 on my laptop and when I opened your db it worked fine.

1. Remove the error handling and put a message box to see if it's firing.
2. In the VBA editor, at the top right hand side where you select the function/sub, make sure the ItemClick is bold.

 

[jdlc]

I'm running 2010 on my laptop and when I opened your db it worked fine.

1. Remove the error handling and put a message box to see if it's firing.
2. In the VBA editor, at the top right hand side where you select the function/sub, make sure the ItemClick is bold.

thanks vbainet, i did quote everything and put only a message box but still my itemclick doesn't firing up, and also sorry for miscom i'm using 2013 access version.

 

[vbaInet]

What about point number 2?

 

[jdlc]

What about point number 2?

2. In the VBA editor, at the top right hand side where you select the function/sub, make sure the ItemClick is bold.

yes it was in bold. see image attached.

 

[vbaInet]

Strange! Are you working on a different machine than before?
And is it the same db you posted before?

 

[jdlc]

Strange! Are you working on a different machine than before?
And is it the same db you posted before?

yup, i'm working with my laptop which has ms office 2013 and running under windows 8, this is the only way i can test if this module is running in higher version, because the place i'm working have 2003 version.

 

[vbaInet]

I thought you said it's 2010? So is it 2010 or 2013?
And have you tried it on the db you uploaded here?

 

[jdlc]

I thought you said it's 2010? So is it 2010 or 2013?
And have you tried it on the db you uploaded here?

sorry for the miscom it was 2013, and it is same db that i was uploaded before, everything is working fine except the itemclick.