Mover de listbox1 a listbox2 y buscar

[Crashman]

Amigos tengo un problemilla estoy llenando un listbox con un rango una hoja de excel..luego el listbox1. (que es el que tiene esta info del rango) tiene multieleccion..despues de que el usuario eligio lo que necesitaba, oprime un boton y este hace que se pase al listbox2 esto lo eh logrado pero no como desearia...porque cuando se pase al otro listbox2 quiero que desaparezca del listbox1 y no se como hacer que busque lo que se encuentra en el listbox2 dentro de otra hoja de excel (supongo que por la propiedad listcount pero si pongo la propiedad que devuelve cadena tendria que poner un select case o algo asi???)...esto lo eh sacado de ejemplos de la internet

Código:

Sub elige_listbox()
Stop
For N = 0 To UserForm2.ListBox1.ListCount - 1
 If UserForm2.ListBox1.Selected(N) = True Then
ListBox2.AddItem UserForm2.ListBox1.List(N)
End If
Next N
End Su

[sorenkierkegaard]

Hola Crashman, te he contestado en el foro de emagister

[juancace]

Yo no entiendo mucho del tema. Entiendo lo que queres hacer, pero no se mucho del VBA.
Tengo esto en un textbox. que hace una busqueda.
Por ahi te puedas orientar para arrancar...

Private Sub CommandButton1_Click()

Cells.Find(What:=TextBox1, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
End Sub

Esto busca en las celdas de acuerdo a lo que yo escriba en el textBox.

SALU2