Tienes una columna de texto. Para cada texto de la columna, desea insertar una nueva hoja de trabajo y nombrar esa hoja de trabajo para el valor en la celda.
Ver video
- Pam quiere crear una hoja de trabajo para cada número de cuenta
- Actualmente, está usando Mostrar páginas de filtro de informes
- Buscando una forma más rápida
- Guarde el libro de trabajo como XLSM
- Compruebe la seguridad de macros con alt = "" + TMS y establezca el segundo nivel
- Alt + F11
- Insertar módulo
- Escriba el código como se muestra
- Alt + Q para volver a Excel
- Alt + F8
- Seleccione la macro y haga clic en Opciones
- Asignar a Ctrl + Mayús + W
Transcripción del video
Aprenda Excel de Podcast, Episodio 2082: Crear macro de hojas de trabajo
Oye, bienvenido de nuevo al netcast, soy Bill Jelen. Bueno, la semana pasada estuve en Bloomington e Indianápolis, Indiana, haciendo dos seminarios allí y Pam del seminario de Indy dijo que tiene esta hoja de trabajo, y para cada celda de la Columna A quiere crear una nueva hoja de trabajo y luego hice esta parte , coloque la celda correspondiente de la Columna B en la Celda B1.
Quiero decir, actualmente, Pam notó que está haciendo esto de una manera muy inteligente, cómo crear todas esas hojas de trabajo, pero sigue siendo una molestia. Ella va a Insertar, Tabla dinámica, OK y luego desde esa nueva Tabla dinámica, pone la Cuenta en el área de Filtros y luego Datos en el área de valores así. Y luego, va a Opciones, Mostrar páginas de filtro de informes, Mostrar todas las páginas de la cuenta y ¡BAM! Ella consigue las sábanas apunta como quiere. Ahora que los datos están en el lugar equivocado, en realidad dice que en este punto simplemente revisa todo por grupos y luego elimina esas tablas dinámicas como esa, ¿de acuerdo? Entonces, ese es el método que está usando en este momento y quiero ver si puedo hacer algo más rápido con esa hoja de trabajo.
Entonces, la forma en que vamos a hacer esto es que tendrás que preseleccionar las hojas, preseleccionar las hojas. También bueno, si nunca ha hecho macros antes, haga Alt + T para Tom, M para Mary, S para Sam y cambie de la primera opción a la segunda opción. También muy, muy importante, te garantizo que tu archivo se guarda como .xlsx. No funcionará si lo deja así, tiene que hacer Archivo, Guardar como y elegir este Libro de Excel habilitado para macros. El de arriba es el predeterminado y el de arriba es el horrible formato de archivo que no puede usar macros.
Muy bien, entonces vamos a seleccionar esos datos Alt + F11, abre el Editor de VBA. Si nunca antes ha hecho VBA, obtendrá esta pantalla fea aquí. Dirá Insertar, Módulo y ahí está nuestro nuevo módulo y vas a escribir este código: la palabra Sub CreateSheets (). Tan pronto como escriba eso, pondrán un End Sub, pero entre los dos vamos a decir Para cada celda en la Selección. Vamos a establecer la hoja de trabajo y realmente probablemente deberíamos hacer este Dim WS como hoja de trabajo. Quiere configurar la hoja de trabajo = Hojas de trabajo. Añadir. Ahora, Worksheets.Add necesita saber dónde queremos agregarlo y lo que quiero hacer es agregar esta hoja de trabajo después del último trabajo que ella tiene en el libro de trabajo. Entonces, voy a decir cuántas hojas de trabajo tenemos ahora. Y aquí solo intentemos, digamos: Debug.Print workheets.Count.Muy bien, dice que tenemos 4, volvamos a Excel y veamos eso. 1 2 3 4, así que lo agregaremos después de la cuarta hoja. Entonces, después del resumen, deberíamos ver una nueva hoja de trabajo y esa hoja de trabajo es donde vamos a poner los datos para la cuenta 100.
Muy bien, WS.Name = cell.Value y luego decidimos que tomaremos lo que esté a la derecha de la Cuenta: los Datos. Y vamos a tomar esos datos y ponerlos en la celda B1 de la nueva hoja de trabajo que acabamos de crear. Entonces, desde la celda, a la derecha, para cada celda vamos a Desplazar 0 filas 1 columna y tomar ese Valor, ¿de acuerdo? Entonces tenemos nuestra macro: Archivo, Cerrar y Volver a Microsoft Excel y luego presionaremos Alt + F8. Alt + F8, CreateSheets, irá a Opciones. Chico, ¿cuál va a ser buena? Ctrl + Mayús + W. W para hojas de trabajo. Así que mantengo presionada la tecla Mayús + W allí, hago clic en Aceptar y podemos hacer clic en Cancelar. Muy bien, seleccione esas celdas y luego Ctrl + Shift + W. Míralo aquí después de Wrap Up - ¡BAM! Los tiene en cada uno. Obtuvo los datos de cada hoja individual. Genial, genial forma de hacerlo.
Ser capaz de crear muchas hojas de trabajo sobre la marcha y, por supuesto, funcionaría para mucho más que eso. Hagamos una = FILA * 2 copie esto abajo, abajo, abajo, abajo, abajo y seleccione todos esos - Oh, espera, tenemos que poner algunos datos allí. Llenémoslo con 2, está bien. Y luego Ctrl + Shift + W. ¡BAM! Oh, ya usé una Hoja 49. Pero mira, estábamos todo el camino hasta el final, rápido, rápido. Cómo crear muchas hojas de trabajo diferentes sobre la marcha.
Muy bien, temas en este episodio: Pam de Indy quiere crear una hoja de trabajo para cada número de cuenta en la Columna A. Actualmente, está usando Mostrar páginas de filtro de informe de tablas dinámicas. Ella está buscando una forma más rápida, ¿de acuerdo? Así que vamos a guardar el libro de trabajo como XLSM. Vamos a seleccionar Alt + TMS y establecer la segunda opción, no la primera. Alt + F11, ahora estamos en VBA, Insertar módulo, escriba el código como se muestra, Alt + Q para volver a Excel, Alt + F8, seleccione el nombre de la macro y haga clic en Opciones, asigne a Ctrl + Shift + W.
Oye, quiero agradecer a Pam por estar en mi seminario en Indianápolis. Lo pasamos muy bien allí, buen grupo. Y quiero agradecerles por pasar. Nos vemos la próxima vez para otro netcast de.
Descargar archivo
Descargue el archivo de muestra aquí: Podcast2082.xlsm
