Aneudys Martinez

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...

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...

Si lo puedes conseguir con estos En el evento open del thisworkbooks Application.Visible = False Pero tiene que tener en cuenta crear un botón alterno para visualizer el libro nuenvamente Por si un día quieres ver el libro como estas o hacer algunas...

Usa estos para carga hora al textbox del formulario TextBox1 = Format(Range("a1"), "hh:mm:ss") Si te silve no olvides valortar para cerrar la pregunta

De la siguiente manera lo puede conseguir presiona alt + f11 Luego inserta un modulo En el modulo pega estas macro Sub InsertarFilasConFormato() Range("a9").Select Dim numFilas As Long numFilas = Range("C5").Value 'Validar si el número de filas...

Prueba de la siguiente manera Presiona alt + f11 esto et lleva al editor de vba Luego inserta un modulo En el modulo pega estas macros Sub ActualizaHora() Range("A1").Value = Time DisparaActualizador End Sub Sub DisparaActualizador()...

Si estas usando un userform Seria desde el evento Initialize Private Sub UserForm_Initialize() TextBox1.SetFocus End Sub Si te silve no olvides valorar para cerrar la pregunta

Lo que solicitas es que se copie la hoja "prestaciones" y que a esta hoja se le cambien el nombre por la del listado que tiene osea Juan Pedro María ... Si es así seria de esta manera Sub Copi_Hoja_Modelo() Application.ScreenUpdating = False Dim...