Aneudys Martinez

En el botón de registro del formulario seria así Private Sub CommandButton1_Click() Sheets("hoja"). Unprotect "tuclave" ' ... Tu procedimiento de registro a la hoja Sheets("hoja"). Protect "tuclave" End Sub Donde Hoja es el nombre de la hoja que vas...

¿ ¿Muéstranos el procedimiento que tiene en el formulario?

A ver si entiendo 1 - quiere que la macro busque la ultima columna vacía del product seleccionado en el combobox2 2 - que copie la cantidad solicitada en el userform Siendo así lo puedes conseguir por emdio de una búsqueda y selection Set h =...

Yo usaría estos para la búsqueda Private Sub CommandButton1_Click() Set h = Sheets("results") Set b = h.Columns("A").Find(ComboBox1) If Not b Is Nothing Then If b = ComboBox1.Value Then label1.Caption = h.Cells(b.Row, "b") End If End If End Sub Donde...

Apliando las respuestas tambien podrias usar de la siguinete manera Private Sub CommandButton2_Click() Ruta = "C:\Users\usuarioX\Desktop\" nombre = "libro b.xlsx" Workbooks.Open Filename:=Ruta & nombre Sheets("BD").Select Set h = Sheets("results")...

Si los ceros están dado por una fórmula Yo lo haría así un do while de la celda activa Sub buscar_devolver_solicitar() Sheets("sheet1").Select Range("i5").Select Do While ActiveCell <> "" If ActiveCell.Value <> "0" Then Range(ActiveCell.Offset(0,...

De la mano de DANTE Reviosa estas pregunta Macro para copiar datos de varios libros y pegarlos en un libro nuevo en la primera hoja. Creo que te puede ayudar solo modifícala en lo que quieres conseguir Y si claro que se puedes

Desde la política de seguridad de windows puedes conseguir estos que solicitas Solo denegar los permisos para eliminar Crea una carpeta y buscar en la opciones avanzada los permisos de borrar y dale denegar Solo deja el de leer y escribir podrán...

Donde quieres que aparezca el total y como haces los registro podrías usar un procedimiento en tu macro como este Suma = WorksheetFunction.Sum(Range("D11:D100000")) Range("D11").Select Do While ActiveCell <> Empty ActiveCell.Offset(1, 0).Select Loop...

A ver si entendí Quiere que se agreguen cierto valor a un combobox por así decir si estos cumple una condición Seria algo así en este ejemplo busco que en la columna DE el valos sea 12 Y que me agregue el valor de la columna A al combobox desde la...