Hola Cacho,
Hoy por la mañana despues de re-leer tu respuesta me percate de algo que tu comentaste
Cita: xlPasteAllExceptBorders
instruye a que la copia sea -definitivamente- idéntica a lo original.
Eso me dio una idea verificar que es lo que estaba haciendo para copiar la fecha y entonces me percate que para tomar esa fecha y pasarla a otra hoja lo que hacia era meterla en una variable y despues asignarla a la celda.
Ahora probe a hacer la copia y efectivamente la copia es idéntica a la original por lo que no me invierte las fechas.
Muy probablemente estoy haciendo mal uso de las variables.
Esto es lo que hacia antes.
Código:
Sub rep_agydsa()
fecha = Range("AH38")<---Aquí tomaba el valor de la fecha.
buque = Range("AD7")
descripcion = Range("AD8")
control_interlinea = Range("AB28")
control_guarda = Range("AG28")
escapeNumero = Range("AG35")
Range("AE5").Value = fecha<---Y aquí lo transferia a la celda donde se invertia la fecha.
Lo extraño es que todas las demás variables funcionan a la perfección excepto la de fecha.
Tendré que usar un poco de más código para hacer el pegado de la fecha, pero todo sea porque funcione bien =)
Mil gracias por tus aportes y comentarios sin ellos no se me hubiera ocurrido hacer esa prueba
.
Saludos,
Erick.