Continuous Form Using VBA to set top record

[Bond77]

I have been struggling with this one for a few days now, and am hoping the experts here can help. If this is answered somewhere else in the forums I apologize.



I have a continuous form that I want to scroll automatically by using the on timer event. I have tried using the seltop property and it works perfectly when I jump to two records below the last visible record; however, when I jump to the 1st record that is not visible it only scrolls down one record (making that the last record visible instead of the 1st record visible. Below is an example of the problem I am having:

Record 1
Record 2
Record 3 (Last visible Record at the bottom of the form)
Record 4
Record 5
Record 6
Record 7

If I use seltop to jump to record 4 the form shows records 2 through 4; but if I set seltop to jump to record 5 the form shows records 5 through 7. I would like to have the form show record 4 as the first visible record.

[RuralGuy]

Perhaps you will find this link useful: http://www.lebans.com/setgetsb.htm

[John_G]

I did a quick test of this, and here is what I found.

If the record you want to see at the top of the display is already visible, but is not the top one, then selTop does not work. If the record you want is above or below the visible area, then selTop does work.

Not thoroughly tested, but that seems to be the answer.

[Bond77]

I tried to look at the Lebans code, but I cannot open the sample db because of the version of access it was created in.

[RuralGuy]

Ahh...it was done in ac97. I converted it to 2000 file format w/ ac 2002. see if you can open it.

[Bond77]

Ahh...it was done in ac97. I converted it to 2000 file format w/ ac 2002. see if you can open it.

Thank you, that version worked.

[RuralGuy]

Outstanding!!! Thanks for the feedback and marking the thread as Solved.

[axsus3r]

Hi,

I unfortunately cannot open the 'GetSetBarsv7.zip' file you provided.

I have Access 2013 (64 bits) and i'm always getting the annnoying error 'Cannot open a database created with a previous version of your application' when
trying to open it.

Any help appreciated.

Ahh...it was done in ac97. I converted it to 2000 file format w/ ac 2002. see if you can open it.

[axsus3r]

Ok, i finally found a workaround by importing all the db objects in a fresh new .accdb file.

I still don't get why my Access install didn't want to open the file directly though.

I would have share my created file if i could, but i think this ability is reserved for administrators.

Thanx anyway for leading me to the solution anyhow ^^


Oh and while i'm here, i think it's worth mentioning that in order to properly work in access 2007/2010/2013 the following statement in fIsScrollBar function :

If fGetClassName(hWnd_VSB) = "scrollBar" Then

has to be replaced with :

If fGetClassName(hWnd_VSB) = "NUIscrollBar" Then

I got this info from another forum.

(Note that you might also need to update this statement in the function fIsScrollBarHZ)


Cheers !

Hi,

I unfortunately cannot open the 'GetSetBarsv7.zip' file you provided.

I have Access 2013 (64 bits) and i'm always getting the annnoying error 'Cannot open a database created with a previous version of your application' when
trying to open it.

Any help appreciated.