Saludos! ¿Cuál sería la macro para crear una nueva hoja similar a la anterior con un botón?

Saludos!

Quiero crear una macro con un botón que me cree una nueva hoja idéntica a la anterior con un número consecutivo tanto en el nombre de la hoja como en una celda.

Ejemplo:

Hoja "CC2-043", celda M43 tengo el número 43

Lo que quiero es que se me copie el mismo formato a una nueva hoja con el número siguiente que sería "CC2-044" (en la hoja) y el número 44 en la celda M43 de la nueva hoja y así sucesivamente.

Además que ese botón perdure para las nuevas hojas creadas.

De antemano muy agradecido "todoexpertos"

Éxitos y Bendiciones!!!

1 Respuesta

Respuesta
1

Te mando mi solución. Ejecutando esta macro desde la última hoja que tengas te hará lo que solicitas.

Sub copia_hoja()
'por luismondelo
nombre = "CC2-0" & Range("m43").Value + 1
ActiveSheet.Copy after:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count)
ActiveSheet.Name = nombre
Range("m43").Value = Val(Right(nombre, 3))
End Sub

Gracias muy buena la macro.

Funciona perfectamente, ahora! si quisiera añadir otro botón para imprimir dos copias del documento digamos que en el rango A1:M12, como sería la macro completa con los dos botones.

Espero su respuesta, muy agradecido por lo anterior!

Esta sería la macro para imprimir lo que solicitas:

Sub imprimir()
ActiveSheet.PageSetup.PrintArea = "a1:m12"
ActiveSheet.PrintOut copies:=2
End Sub

recuerda finalizar

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Macros para imprimir

Quisiera saber como hacer un macros que me imprima un rango de celdas (a1 a k56) Por medio de un botón y la cantidad de copias estén dadas por el valor que tome de una Celda especifica (p5)
1 respuesta

¿Cómo saber el nombre de una autoforma generada por macros? Y como guardar el nombre

Tengo la siguiente instrucción que me genera una autoforma el cual es el siguiente: ActiveSheet.Shapes.AddShape(msoShapeBevel, 0#, 0#, 72#, 36.75).Select Selection.Characters.Text = Range("A1") ¿Mi duda es como puedo saber el nombre de la autoforma...
1 respuesta

Macro que seleccione áreas para imprimir

Necesito incluir en una macro un código que distinga el área a imprimir y lo deje establecido para que la opción print de excel lo haga directamente cuando así se lo pida.
1 respuesta

Guardar como pdf área de impresión con PDFCREATOR

Me gustaría agregarle a un botón una macro para que al apretar el mismo me guarde el área de impresión que seleccione como pdf, usando pdf creator, en office 2003. Pero, a su ves, que la paginas en blanco las elimine. Es decir, como por ejemplo. Yo...
1 respuesta

Copiar la misma celda de muchas hojas de un mismo Libro Excel a otra Hoja distinta o Libro.

Tengo un archivo Excel con unas 7.000 hojas. Necesito crear un archivo (ya sea una hoja dentro del mismo Libro o un Libro aparte), donde copiar el dato de la misma casilla en todas las 7000 hojas. Ejemplo: En cada hoja del Libro, en la casilla b11,...
2 respuestas

Macro para crear una hoja con consecutivo

Necesito crear una macro y insertarla a un botón, que cuando la ejecute creé una hoja al lado con un consecutivo, ademas de eso también necesito ese consecutivo en una celda especifica de mi hoja, Sera que alguien me ayuda con este problema.
1 respuesta

Necesito una macro que copie una hoja y le cambie el nombre por el valor de una celda

Tengo ya una macro, la cual cambia el nombre por la fecha actual Sub ReplicarHojaActual() Sheets("Control de tareas").Copy After:=Sheets(ActiveWorkbook.Sheets.Count) ActiveSheet.Name = Day(Now()) End Sub En la fila ActiveSheet.Name = Day(Now()) La...
2 respuestas

Macro guardar como.. (2)

Otra vez acudo a ti, en busca de ayuda. Es en relación a la pregunta anterior, para la macro de Guardar como... La macro me funciona perfectamente, aunque no tanto, pues algo me he descuidado, te explico: Utilizo en mi proyecto, una libro principal...
1 respuesta

¿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

Excel: interrelacionar datos de diferentes hojas de cálculo

Quisiera por favor me ayuden: Como puedo hacer en una hoja de calculo al ingresar un código de producto y en un botón aceptar al darle clic me lleve a otra hoja de calculo (mostrándome la información del código ingresado hecha por el usuario)....
1 respuesta