Si un libro de Excel tiene muchas hojas y algunos de ellos tienen las macros en el interior, la única manera que he encontrado para determinar qué hojas tienen macro es haciendo clic en cada uno de ellos en el Explorador de proyectos (Ctrl + R en VBA)¿Cómo determinar rápidamente qué hojas tienen macros en Excel Workbook?
¿Hay alguna otra manera de hacerlo?
Puede bucle sobre las hojas y utilice la siguiente sintaxis:
If ActiveWorkbook.VBProject.VBComponents(sheetName).CodeModule.CountOfLines <> 0 Then
sheetName ser el nombre de la hoja.
Para un uso más avanzado, debe marcar page que proporciona ejemplos más avanzados.
Respondí una pregunta recientemente en MSDN y al final escribí una publicación de blog en ella.
Tema: Comprobar si un archivo de Excel tiene una macro
Enlace: http://www.siddharthrout.com/2012/04/12/check-if-an-excel-file-has-a-macro/
A continuación, puede utilizar .VBComponents.Item(i).Name con .VBComponents.Item(i).Type para comprobar qué "Hojas" tienen "macros" .
EDITAR
Técnicamente hablando cada macro es una pieza de código pero no es necesario que cada pieza de código es una macro. Entonces, si solo está buscando macros, vea la primera parte de la publicación del blog y, si está buscando un código, mire la segunda parte de la publicación del blog.
Ummm, eso no funcionará :) Ver el enlace en mi publicación –
Ummm, acabo de probarlo y funciona para mí (imprime 0 si no hay código y el número de línea si hay algún código). ¿Me estoy perdiendo algo más? – assylias
Sí 2 cosas :) 1) Ver mi última edición en mi publicación 2) Si tiene marcada "Requerir declaración de variable", el recuento de líneas siempre será mayor que 0 aunque no haya código porque tendrá "Opción explícita" en la parte superior. Todo está explicado en mi blog. –