I made a Dialogsheet with a listbox and a OK button.

I unchecked the dismiss control of the OK button so that the
Dialogsheet remains open after pressing OK.

I set the listbox on top of the tab order. This way it is
automatically active when I first show this Dialogsheet.

Here is my problem: After pressing the OK button, it remains active
and I always have to either click the mouse or hit the tab button to
activate the listbox again. Is there a way to automatically active
this listbox?

I am looking for something like this:

Dialogsheets("MyDialog").ListBoxes("MyListbox").Ac tivate

Any help would be appreciated.

Roger

Try putting this in the cmdOK_click routine (or equivalent)

listbox1.setfocus

Robin Hammond
www.enhanceddatasystems.com


"Roger Ritter" wrote in message
om...
I made a Dialogsheet with a listbox and a OK button.

I unchecked the dismiss control of the OK button so that the
Dialogsheet remains open after pressing OK.

I set the listbox on top of the tab order. This way it is
automatically active when I first show this Dialogsheet.

Here is my problem: After pressing the OK button, it remains active
and I always have to either click the mouse or hit the tab button to
activate the listbox again. Is there a way to automatically active
this listbox?

I am looking for something like this:

Dialogsheets("MyDialog").ListBoxes("MyListbox").Ac tivate

Any help would be appreciated.

Roger