Cómo crear un libro de trabajo y cambiar el nombre de las tablas
¿Quiere crear libros de trabajo que contengan doce hojas de trabajo para poder recopilar datos para cada mes del año? Deje que una macro haga esto automáticamente.
La siguiente macro crea un libro de trabajo nuevo y vacío con doce hojas de trabajo y nombra las hojas individuales en forma abreviada de los nombres de los meses, es decir, "Jan", "Feb", etc. Aquí está la macro apropiada:
Sub tablas CreateMonth ()
Atenuar el número de tabulación como entero
Atenuar nuevo como libro de trabajo
Atenuar nombres como variante
Nombres = array ("Ene", "Feb", "Mar", "Abr", "Mayo", "Jun", _
"Julio", "agosto", "septiembre", "octubre", "noviembre", "diciembre")
TabNumber = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 12
Establecer nuevo = libros de trabajo.
Application.SheetsInNewWorkbook = TabNumber
Para TabNumber = 1 a 12
New.Worksheets (TabNumber) .Name = Nombres (TabNumber - 1)
Siguiente número de pestaña
End Sub
Después de comenzar, recibirá un libro de trabajo con doce hojas de trabajo. La siguiente figura muestra cómo se ve el resultado:
Si desea utilizar otros nombres en lugar de los nombres de los meses, adapte los nombres en la asignación de valor a la variable "Nombres".
Sugerencia: si desea saber cómo ingresar e iniciar macros en Excel, encontrará una breve descripción aquí: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
