Dante Amor

En tu libro normal, en tu userform1, en tu botón detalle pon lo siguiente: Run "'libro Mayor.xlsm'!abrir", TextBox1.Value Ahora, en tu "libro mayor", en un módulo, crea la macro "abrir" y pones lo siguiente: Sub abrir(dato) 'Por.Dante Amor With...

Intenta lo siguiente: primero, quita la instrucción On Error Resume Next Después, en uno de los equipos donde no funciona, ejecuta la macro paso a paso con la tecla F8. Cuando aparezca el error o se detenga la macro, me dices en cuál línea se detuvo...

A petición fórmula matricial =INDIRECTO(DIRECCION(MAX(($A$9:$A$16=$A2)*FILA($A$9:$A$16)),MAX(($B$8:$F$8=$B2)*COLUMNA($B$8:$F$8)))) Nota: Cambia coma (,) por punto y coma (;) si utilizas punto y coma (;) como separador de argumentos. Aceptar fórmula...

No explicaste cómo quieres que la macro NO sobreescriba, supongo que quieres que los datos se almacenen en la siguiente fila vacía. Lo que hace tu macro es poner una fórmula en la hoja "historial", pero también supongo que quieres almacenar en la...

Revisa la siguiente respuesta: Correspondencia en word la fecha sale en ingles como se pone en español? ['. No olvides darle like a la respuesta y regresar a valorar

Si ya tienes la fórmula para calcular el número de días entre 2 fechas, entonces a esos días calcula los meses con la siguiente fórmula =SI(C2/30-ENTERO(C2/30)>=0.5;ENTERO(C2/30)+0.5;ENTERO(C2/30)) Ejemplo '.[Sal u dos. Dante Amor. No olvides valorar...

Te anexo una macro Sub Borrar_Datos_Iguales() 'Por Dante Amor Application.ScreenUpdating = False Application.DisplayAlerts = False ' Set h1 = ActiveSheet Set h2 = Sheets.Add h1.Columns("A").Copy h2.Columns("A") u2 = h2.Range("A" &...

Revisa los siguientes enlaces, ahí explico cómo agregar más columnas Codigo VBA para un Listbox con mas de 10 columnas Tengo un Listbox con 20 columnas pero sólo me muestra 10 ['.Recuerda votar las respuestas y regresar a valorar. Avísame si tienes...

Pon la siguiente macro en los eventos de la hoja La macro revisa cuál es la última fila con datos de la columna A, si lo prefieres, puedes cambiar la columna "A" por la columna en donde siempre capturas un dato. Private Sub Worksheet_Change(ByVal...

¿El "otro libro" ya existe o va a ser un libro nuevo?