Insertar Hojas por cada celda

En una hoja excel (Hoja1)tengo una tabla con los siguienets Datos: "Nombre de Persona" y "Telefono", y en otra hoja excel (Hoja2) tengo un formato; quiero una macro que al ejecutarla me cree tantas hojas como personas tenga la Hoja1, y que estas hojas que se crearon sean una copia exacta del formato de la Hoja2; y ademas de ello que el nombre de cada persona aparezca en la celda A2 (ojo que es una hoja por persona) y el teléfono que aparezca en la celda B2.
Espero puedan ayudarme
Saludos

1 respuesta

Respuesta
1
¿Cómo va todo? Bueno, te he construido la siguiente macro, que parte de la siguiente hipótesis: en la hoja1 tiene los datos, y éstos empiezan en la celda A2 (La fila 1 contiene los encabezados, es decir, nombre y teléfono). Así que si no empiezan en A2, cambia esta referencia por la que corresponda. Y la hoja que tiene los formatos se llama Hoja2.
Sub CrearCopias()
Sheets("Hoja1").Select
Range("A2").Select
While ActiveCell.Value <> ""
Range(ActiveCell, ActiveCell.Offset(0, 1)).Copy
Sheets.Add
ActiveSheet.Paste Range("A2")
Sheets("Hoja2").Cells.Copy
Selection.PasteSpecial Paste:=xlFormats
Sheets("Hoja1").Select
ActiveCell.Offset(1, 0).Activate
Wend
Application.CutCopyMode = False
End Sub
Esta macro hace exactamente lo que pides, si te queda cualquier duda, preguntame de nuevo y con gusto te ayudo. (Pero si resolvió tu duda.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

¿Cómo crear una tabla resumen clasificada de acuerdo a valor de una celda?

Tengo un archivo de excel conformado por varias hojas, en cada una de las hojas un resumen de gastos mensual que esta ordenado por fecha y esta compuesto de varios datos En la primera columna esta un código de clasificación (importante) y en las...
1 respuesta

Sumar datos de varias hojas

Necesito una formula que me permita sumar datos de varias hojas pero de diferentes celdas. Me explico: en la primera columna de cada hoja tengo nombres de personas que no siempre son los mismos para cada hoja. En la segunda columna tengo un valor...
3 respuestas

¿Puedo extraer el valor de una misma celda en varias hojas diferentes y que aparezca en otra hoja?

Quería saber si existe alguna función en excel con la que pueda extraer el valor de una misma celda pero de varias hojas diferentes y que aparezca en otra hoja. Por ejemplo si tengo Hoja1, Hoja2 y Hoja3 tengo que hacer que el valor de la celda A1 de...
1 respuesta

Macro para guardar información de hoja1 a hoja2 con fecha. Excel

Espero que me puedan ayudar, normalmente imprimo todos los días hojas en excel, podrían ayudarme en un macro para poder guardalo en la siguiente hoja, correlativo uno debajo de otro y ordenados por fecha. El formato que relleno datos es de 5 columnas...
1 respuesta

Cambiar nombre a hojas de excel con m

Necesito una macro que me inserte una nueva hoja de excel y me le cambien el nombre a esa hoja por un valor que se encuentra en una celda de la misma hoja incertada, es para una facturación ya que cada factura es una hoja incertada y el numero de la...
1 respuesta

Macro que vea si se cumple una condición y copie otra celda de la fila, si no que baje y re-evalúe

Necesito ayuda para crear una macro que evalué si una celda (HOJA 1, Celda L2) cumple una condición. Si la condición se cumple (="Cobro"), que copie el contenido de una segunda celda de la misma fila (HOJA 1, Celda B2) y lo pegue en una tercer celda...
2 respuestas