Como copiar valores de un rango de celdas a otra h

Buen día!
Vi la respuesta de la Macro y me gustó mucho. Ahora bien, ¿hay alguna forma de establecer un valor variable en lugar de una Celda u Hoja fija? De forma tal que en algún lugar de mi Hoja yo pueda colocar el Nombre de la HOJA en la que quiero copiar los datos y en otra celda la Referencia a la Celda en la que deseo comenzar.
Ej.
Worksheets(referencia_a_celda).Range(referencia_a_otra_celda)
Donde referencia_a_celda es una celda que contiene el nombre (Ej. Hoja3), y referencia_a_otra_celda es una celda que contiene la celda de partida (Ej. E2)
Gracias...

1 respuesta

Respuesta
1
¿De qué macro estaremos hablando?
No importa, estas líneas te servirán:
hoja = Range("B3")
rgo = Range("B4")
Sheets(hoja).Select
ActiveSheet.Range(rgo).Select
La celda B3 tendrá el nombre de la hoja y B4 una referencia válida, como E3
Muchas gracias, Elsa!
Me refería a una Macro que vi en:
http://www.todoexpertos.com/categorias/tecnologia-e-internet/software-y-aplicaciones/microsoft-excel/respuestas/107011/como-copiar-valores-de-un-rango-de-celdas-a-otra-h
Pero como soy nueva en esto, aparentemente no supo como colocar mi pregunta enlazada al mismo tema.
Voy a probar con tus indicaciones. Una vez más, gracias!
Reitero entonces las instrucciones para que te quede claro como el ejemplo:
hoja = Range("B3")     'aquí guardarás el nombre de hoja destino
rgo = Range("B4")      'aquí guardarás la celda destino
Selection. Copy 'habrás seleccionado previamente lo que quieras copiar
WorkSheets(hoja). Range(rgo).PasteSpecial... y todo lo que sigue
Saludos (no olvides finalizar)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas