Editar-Eliminar Fila desde ListBox

[@yaderhernandez4772]

Tremenda explicación estimado... Sería bueno agregar también un validador después de cada acción o movimiento y registrarlo dentro de un formulario de captura.. Como siempre Felicidades maestro... Saludos desde Nicaragua....

[@EcoDev-Solutions]

Seria interesante. Espero hacerlo pronto. Saludos cordiales.

[@18mau78]

Lo estaba esperando. Gracias por tu trabajo. Es exquisito. Me sirve para mi trabajo, para mi estudio. GRACIAS REALMENTE! Saludos desde Argentina.

[@EcoDev-Solutions]

Gracias por comentar!

[@leonardocontento4208]

Maestro mil gracias excelente el video y la explicacion pregunto para que sea completo esta parte lo que falta es agregar mas registros

[@EcoDev-Solutions]

Gracias por comentar. Saludos cordiales.

[@ferneyrestrepo3457]

Si el listbox tiene datos respectivos como hago para modificar

[@EcoDev-Solutions]

Puedes trabajar con la selección actual. Un ejemplo de ello está en el siguiente enlace : kzbin.info/www/bejne/g4iuaIqaqqmni68 También puedes ver en mi canal EcoExcel, mas sobre el control ListBox.

[@SuperDavidFz]

Como faço para guardar os itens eliminado na hoja2?

[@EcoDev-Solutions]

Si se puede. Déjame hacer el vídeo. Saludos.

[@chimboterex]

Gracias , si registra uno nuevo campo o registro con formulario se puuede visualizar en listbox1, gracias

[@EcoDev-Solutions]

Todo funciona al cargar el formulario en donde se moestrará en el ListBox los datos de la hoja y es en la hoja donde se hacen los cambios y registrar nuevos datos.

[@leonardocontento4208]

Maestro felicitaciones por compartir sus conocimientos en una forma clara, y una sugerencia sera posible para que este formulario este completo es busqueda, agregar nuevos registros, modificacion y eliminacion mil gracias que se tome la molestia nuevamente mil gracias y saludos desde loja ecuador

[@EcoDev-Solutions]

Si gustas, puedes ver este video. : kzbin.info/www/bejne/hnyvY5-Bft9sorM

[@EcoDev-Solutions]

Tambien este : studio.kzbin.info3qvSODvK5Vs/comments

[@EcoDev-Solutions]

Y tambien este : studio.kzbin.infoywWWNmnI_uk/edit

[@proyecto2148]

Hola, desde aquí descargué el archivo, como le dije, no puedo editar números y tampoco eliminarlos, usted cree que pueda hacer un tutorial de como seleccionar una fila de una columna según la selección del listbox y posteriormente editarlo(principalmente números)?? Sería genial, bueno espero se encuentre bien, saludos...

[@EcoDev-Solutions]

Hola. En la descripción del viseo está el enlace de descarga. Puedes hacer las pruebas con ese archivo. Este vídeo se diferencia del otro porque este cuenta con un bucle para la hoja. Si lo recorrido en la hoja coincide con la selección del ListBox, entonces ejecuta la acción de eliminar o editar.

[@ilcheaaronparkcardenas4994]

Está bien, pero el coódigo no funciona si tiene datos repetidos si pones 2 veces enero y modificas entonces Enero y Enero se modificarán a la vez

[@ilcheaaronparkcardenas4994]

Acabo de solucionar el error pero no creo que sea la forma correcta Dim I As Integer Dim uf As Long With Hoja1 uf = .Range("B" & Rows.Count).End(xlUp).Row For I = 1 To uf If List_Control.List(List_Control.ListIndex, 0) = .Cells(I, 2) Then If List_Control.List(List_Control.ListIndex, 1) = .Cells(I, 3) Then If List_Control.List(List_Control.ListIndex, 2) = .Cells(I, 4) Then If List_Control.List(List_Control.ListIndex, 3) = .Cells(I, 5) Then If List_Control.List(List_Control.ListIndex, 4) = .Cells(I, 6) Then If List_Control.List(List_Control.ListIndex, 5) = .Cells(I, 7) Then If List_Control.List(List_Control.ListIndex, 6) = .Cells(I, 8) Then If List_Control.List(List_Control.ListIndex, 7) = .Cells(I, 9) Then If List_Control.List(List_Control.ListIndex, 8) = .Cells(I, 10) Then If List_Control.List(List_Control.ListIndex, 9) = .Cells(I, 11) Then .Cells(I, 2) = Me.C_cussp.Text .Cells(I, 3) = Me.C_afiliado.Text .Cells(I, 4) = Me.C_mes.Text .Cells(I, 5) = Me.C_citas.Text .Cells(I, 6) = Me.C_tipo.Text .Cells(I, 7) = Me.C_producto.Text .Cells(I, 8) = Me.C_prima.Text .Cells(I, 9) = Me.C_fecha_cierre.Text .Cells(I, 10) = Me.C_asesor.Text .Cells(I, 11) = Me.C_observaciones.Text End If End If End If End If End If End If End If End If End If End If Next I End With End Sub 'SALU2'

[@EcoDev-Solutions]

Hola. Gracias por ver el video. Este funciona para datos únicos, no repetidos. Ahora si desea eliminar filas seleccionadas desde tu listbox+las fila de la hoja con datos repetidos, puedes usar las siguientes linea de codigo y lo bueno es que borra exactamente la fila seleccionada. Recuerda cambiar el objeto Hoja1 por la hoja que uses With ListBox1 If .ListIndex = -1 Then Exit Sub 'Si no hay selecciones, que salte Hoja1.Rows(.ListIndex + 2).Delete 'Elimina la fila de la hoja según selección + 2 del ListBox .RemoveItem (.ListIndex) 'Elimina la fila seleccionada del ListBox End With Cuéntame tus impresiones. Saludos cordiales.

[@EcoDev-Solutions]

Mira este enlace : studio.kzbin.infoIeegXv3bcJk/edit

[@leonardocontento4208]

Gracias no se si sera posible abusando de su amabilidad puede ser en un solo archivo colocar el formulario de busqueda, ingreso de datos pero evitar datos repedidos (con criterios de descripcion y unidad) osea dos criterios , modificacion y eliminacion mil gracias ejemplo cod descripcion unidad y precio Ejemplo cod 100 descripcion cemento unidad saco precio 8 dolares no permitir el ingreso nuevamente de este material pero si se puede hacer un nuevo registro de cod 101 descripcion cemento unidad kg precio 0.16 dolares esto le molesto porque tengo una base de datos que se utiliza en analisis de precios unitarios mil gracias

[@EcoDev-Solutions]

Escribe al correo con un ejemplo de los que tienes para ayudarte. [e-mail] P.D. No olvides compartir los videos para que otros puedan verlos. Saludos cordiales.

[@brayandiazjimenez1420]

Me gustaría que hicieras uno donde mientras se escribe en un textbox se muestren las coincidencias en el listBoxt pero que esa consulta la realize en el listBoxt, y no en la hoja con el operador Like “*” SE LO AGRADECERÍA MUCHO 🙏.

[@EcoDev-Solutions]

Hola. Lo que me indicas es un filtro que mientras se escriba, muestre las coincidencias en un ListBox. Es correcto?

[@brayandiazjimenez1420]

EcoExcel Hola, es correcto, es que tengo un Userform que al iniciar carga los registros en el listBoxt, pero cuando escribo en el textBoxt me gustaría que me filtre las coincidencias mediante el comodín Like “*”.

[@brayandiazjimenez1420]

Pero que la consulta la realice con los registros que el listBoxt ya tiene cargados cuando se inició el Userform. Muchas gracias por sus grandes aportes! Saludos.

excelente!!!

[@EcoDev-Solutions]

Gracias