Victor Perdomo

Debes de tener en cuenta, que el archivo debe de estar abierto, para que la macro se ejecute. De no ser asi, podemos probar con un script y tareas programadas

Supongo que cada entrega tiene un condigo único, yo lo coloque en la columna A, adicione otra columna con la formula que indica si la fecha de entrega esta en el rango de una semana, y como lo indicas al final, la información se muestra en una tabla...

Prueba este código Private Sub Worksheet_Change(ByVal Target As Excel.Range) Dim Tipo As String If Target.Column = 5 Then Tipo = Target.Value Select Case Tipo Case "CH", "ND" Target.Offset(0, 1).Select Case "DP", "NC" Target.Offset(0, 2).Select Case...

Prueba este libro y me cuentas, si tienes dudas http://sdrv.ms/16JIT7X De no tenerlas

Prueba con la funcion format. Format(expresión, formato) Donde formato para hora puede ser: MiCadena = Format(Time, "Long Time") ' Devuelve la fecha actual del sistema en el formato largo de fecha definido por el sistema. MiCadena = Format(MiHora,...

Debes de usar la propiedad column del target. Adicionalmente en un Select-case, puedes colocar multiples expresiones: Private Sub Worksheet_Change(ByVal Target As Excel.Range) Dim Tipo As String If Target.Column = 5 Then Tipo = Target.Value Select...

Te envio la formula de una solucion, pero la columna de los tiempos debe de estar en formato hora. Suponiendo que lo datos empiezan en A2, agregas dos columnas en F2 la formula seria =REDONDEAR.MENOS(B2*1440;0)/1440 y en G2 =SI(F2=F1;G1+1;1). La...

Una solución es que modifiques la macro y no le des una referencia absoluta del estilo $A$1 tendrias que darle un nombre a la columna, y asignarle este nombre a la macro, los nombres de los rangos se desplazan al agregar o eliminar columnas. De todos...

Cambia la linea: Range("a1:o" & Range("a65000").End(xlUp).Row).Copy por: Range("a1:ap" & Range("a65000").End(xlUp).Row).Copy Si solucionaste tu problema da por finalizada la pregunta, si tienes cualquier otro inconveniente, avisame

Si quieres yo te puedo ayudar, enviame tu archivo a [email protected]