lucasmm

Adriel Ortiz Mangia respondió: H o l a: Comparte el libro, pero tiene ciertas limitaciones por ejemplo insertar, filtros avanzados etec.. Infórmate aquí Compartir libros con macros Formulario en excel en red y trabajen en simultaneo Valora la respuesta para finalizar saludos!

Dante Amor respondió: Te anexo la macro Private Sub CommandButton1_Click() 'Por.Dante Amor ListBox1.ColumnCount = 4 ListBox1.AddItem cmbcodigo ListBox1.List(ListBox1.ListCount - 1, 1) = cmbdescripcion ListBox1.List(ListBox1.ListCount - 1, 2) = txtcantidad...

Elsa Matilde respondió: En lugar de la línea: Rows(fila).Delete Shift:=xlUp Utilizá esta otra si tu intención solo es borrar el contenido: Range("L" & fila & ":M" & fila) = "" Sdos Elsa

Dante Amor respondió: Puedes cargar el listbox con additem de la siguiente forma: Private Sub UserForm_Initialize() 'Por.Dante Amor For i = 1 To Sheets("Hoja1").Range("A" & Rows.Count).End(xlUp).Row ListBox1.AddItem Sheets("Hoja1").Cells(i, "A") Next End Sub Ahora sí, ya...

Dante Amor respondió: Envíame tu archivo y me explicas cómo funciona tu formulario y de esa forma adaptar el código.

Elsa Matilde respondió: TE dejo la rutina completa. La cantidad de columnas del control puede indicarse desde el panel de propiedades teniendo el control seleccionado (Propiedad: ColumnCount), sino lo declaras en este evento. Private Sub UserForm_Initialize() 'x Elsamatilde...

Elsa Matilde respondió: Te dejo un par de ajustes para que pruebes y me comentes lo que todavía debiera agregar/quitar porque muy claro no se ve tu código. Private Sub CommandButton1_Click() 'comentada x Elsamatilde 'guarda la 1er fila libre según col A libre = Range("A" &...

santiagomf respondió: Pon al final de tu código estas dos instrucciones: Menu. Repaint DoEvents Con ellas se actualizará el formulario "menu". Por cierto, ten cuidado con la propiedad "showModal" de los formularios. No puedes tener 2 formularios "modales" al mismo tiempo.