Excel - COMO ELIMINO DE UN LISTBOX UN REGISTRO

Buenas Noches, estoy diseñando un programa en vba de excel 2010. tengo una factura alimentada por un formulario, hay 4 listbox (Cantidad, Descripcion, ValorUnitario, ValorTotal) estos datos los cargo de otro formulario que me permite ingresar productos 1 a 1.
lo que necesito es saber como puedo eliminar un producto en caso que lo halla ingresado mal.
y lo otro es saber como puedo limitar los listbox a una cantidad especifica (tengo que limitar los productos a un numero determinado)

para cargar los listboxes yo suelo trabajar con listas.
Una lista no deja de ser un conjunto de celdas puestas una encima de otra. En caso de tener que añadir un elemento, simplemente me voy a un punto intermedio y le digo añadir celda. Así me la incluye en la lista.
Para eliminar, lo mismo. Le digo que me elimine la celda que contiene el elemento, arrastro hacia arriba y listo.

Aun no es claro, no comprendo .

Jorge Palacios
Con respecto a la carga de datos de un ListBox, deberías posicionarte sobre el primer registro a cargar y utilizar el siguiente código:

Lo que hace esto es, ya habiéndote posicionado sobre el primer registro a agregar, recorre uno a uno de manera vertical hasta llegar a una celda vacía donde deja de cargar...
Con respecto a eliminar un registro, podrías probar con el siguiente código que elimina el registro seleccionado (le podrías agregar esta sentencia a un botón, por ejemplo):

Saludos,

Gonzalo

Saludos, para eliminar el codigo me sirvio perfecto

ListBox1.RemoveItem ListBox1.ListIndex

lo que hay que hacer para adaptarlo es cambiar el listbox por el nombre del mismo.

quiero saber si me puedes ayudar un poco mas, lo que pasa es que en la factura tengo 4 listbox y para eliminar un producto me tocaria

el siguiente codigo

Private Sub CommandButton2_Click()

lstCantidad.RemoveItem lstCantidad.ListIndex
lstDescripcion.RemoveItem lstDescripcion.ListIndex
lstValorUnitario.RemoveItem lstValorUnitario.ListIndex
lstValorTotal.RemoveItem lstValorTotal.ListIndex

End Sub

por el codigo no hay lio, pero me toca seleccionar los 4 listbox manualmente y pincharlos con el mouse para luego dar la opcion del boton.

Private Sub lstDescripcion_Click()
Dim i As Integer

'selecciona totdos los listboxs
For i = 0 To Me.lstCantidad.ListCount - 1
If Me.lstCantidad.Selected(i) = True Then
lstDescripcion.Selected(i) = True
lstValorUnitario.Selected(i) = True
lstValorTotal.Selected(i) = True
End If
Next i

Seleccionas cualquier items del listbox Cantidad y automaticamente se seleccionaran los demas