Copiar un rango en la última celda vacía (fila)

[lolailo]

Hola. Tengo una hoja llamada "HEINZ1", con un rango que va de C1:C8, y deseo copiarlo en otra hoja "HEINZ2", en la primera celda vacía de la fila 1, y así sucesivamente.

Adjunto el ejemplo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[lolailo]

Hola. Tengo una hoja llamada "HEINZ1", con un rango que va de C1:C8, y deseo copiarlo en otra hoja "HEINZ2", en la primera celda vacía de la fila 1, y así sucesivamente.

Adjunto...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

.
Hola! lolailo. Intenta con:

Sub paraCopiar()
With Sheets("Heinz2").Range("a2")
  .Cells = "CachoR"
  With .CurrentRegion
    Sheets("Heinz1").Range("c1:c8").Copy .Offset(...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[lolailo]

Puede andar... y correr también.

¡¡¡ PERFECTO !!!

Gracias, crack.

 

[lolailo]

Disculpa... ¿Podrías hacerlo igual pero que copie como valores?

Gracias.

 

[Cacho R]

.

... ¿Podrías hacerlo igual pero que copie como valores? ...

¿Qué valores?, te lo pregunto porque no veo fórmulas por ningún lado...

 

[lolailo]

No he pasado el excel original (es confidencial, disculpa). En dicho excel hay fórmulas en el rango en cuestión.

 

[Cacho R]

No he pasado el excel original (es confidencial, disculpa). En dicho excel hay fórmulas en el rango en cuestión.

¡Entendí!... Entonces reemplaza:

...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[lolailo]

Perfecto otra vez.

Muy agradecido, Cacho R :D :D :D

 

[Cacho R]

Gracias por tu devolución y hasta la próxima.

Cacho R.
.