Adding items at the top of a list box

[Ca1icoJack]

How can I add items to the top of a list box rather than the bottom?

I want to type in a word and then click a button which does this in a user form.

Thanks in advance

 

[SkipVought]

Hi,

What application? If it's MS Access, then post your question in forum705.

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[Ca1icoJack]

Its for Excel. Although since its adding within a userform why would it make a difference?

 

[SkipVought]

How did you assign the rowsource to begin with?

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[Ca1icoJack]

The source of each item is a text box above.

So my code is currently:

________________________________________________________

Private Sub CommandButton1_Click()

UserForm1.ListBox1.AddItem (UserForm1.ListBox1.Value)

End Sub
________________________________________________________

I assume it would be something like the following, although that simply overwrites the top row.
________________________________________________________

Private Sub CommandButton1_Click()

UserForm1.ListBox1.List(0,0) = UserForm1.ListBox1.Value

End Sub
_________________________________________________________

 

[strongm]

If you had Auto Quick Info enabled (whicyh it is by default) in the IDE you should see that AddItem can take a second parameter which indicates where in the list the item is added.

The help file is also worth consulting on this.

 

[Ca1icoJack]

pvargIndex is shown but what value should I put for it?

I tried the following originally, but the text always turns red, is there something else I need to do to make this work?
________________________________________________________

Private Sub CommandButton1_Click()

UserForm1.ListBox1.AddItem (UserForm1.ListBox1.Value, 0)

End Sub
________________________________________________________

 

[Ca1icoJack]

Nevermind... Brackets were causing the problem.

Thanks very much for your help.