Andrés Álvarez

Elsa Matilde respondió: Te dejo el ajuste a la macro del evento Change del Apellido, que es la que busca coincidencias en la otra hoja: Private Sub Apellido_Change() On Error GoTo ERR: If Apellido = "Apellido" Then Exit Sub 'Color azul al entrar al campo...

Elsa Matilde respondió: En el título mencionas el uso de un Combobox... pero luego comentas acerca de un textbox. Lo del textbox ya te lo respondí en la otra consulta. Y si necesitas lo mismo para algún combobox, también se puede. Solo confirma para ajustarte el código...

Elsa Matilde respondió: Se me ocurre colocar el texto en gris y al entrar en el control se borrará y lo que ingreses será del modo normal. Ahora, no me parece borrar el contenido del control al salir ya que perderás lo que ingresaste, sino que lo debieras hacer por ej luego...

Dante Amor respondió: Tengo una macro que filtra la información en una hoja temporal y esa información la carga en el listbox. Pero supongo que una vez que cargaste la información filtrada en el listbox vas a realizar algo con alguno de los registros, para eso tengo que...

Dante Amor respondió: Agregué el siguiente código a tu formulario: i = ListBox2.ListCount ListBox2.AddItem ActiveCell.Offset(0, 1).Select ListBox2.List(i, 0) = (ActiveCell.Value) ActiveCell.Offset(0, 1).Select ListBox2.List(i, 1) = (ActiveCell.Value) ActiveCell.Offset(0,...

Elsa Matilde respondió: Ya dejé imágenes en la consulta anterior para que observes que se cargan bien las horas y fechas con el código enviado. Seguramente aún no agregaste esos códigos en el UF de Modificar. Bien, ¿cómo mejorar la programación? Estos son los errores más...

Elsa Matilde respondió: Las instrucciones del pase de la hoja al listbox son correctas, no entendí cuál es tu problema. Mencionas col C pero la macro dice col D, ¿será eso? Me.ListBox1.List(Me.ListBox1.ListCount - 1, 3) = Format(Cells(i, j).Offset(0, 3), "hh:mm:ss") Nota:...

Elsa Matilde respondió: El contador se carga la primera vez al inicio del UF con la instrucción que toma el valor máximo de la col A +1: Text_Id.Value = Application.WorksheetFunction.Max(Sheets(2).Range("A:A")) + 1 Y esta misma instrucción se debe colocar cada vez que se...