Colección de citas famosas - Colección de máximas - Extraer el contenido de la etiqueta de Excel (urgente~)

Extraer el contenido de la etiqueta de Excel (urgente~)

Haga clic en Ver - Barras de herramientas - Cuadro de control de herramientas y luego haga clic en el botón de comando en el Cuadro de control de herramientas. Luego dibuje un botón en cualquier lugar de la hoja de trabajo, haga doble clic en el botón y aparecerá la interfaz de edición de código. Copie el siguiente contenido en el área de código:

Botón de subcomando privado 1_Click()

Cambiar a para duplicar

Para a = 1 a 300

p>

Yo. Celdas (a,1) = Este libro de trabajo. Hoja de trabajo (a). Nombre

Siguiente a

Conector final

La barra de herramientas común debajo de la barra de menú de la interfaz de edición de código tiene un botón para salir del modo de diseño, haga clic en él. Luego regrese a la hoja de trabajo y haga clic en este botón para finalizar. Al mismo tiempo, habrá un mensaje de error que está fuera de los límites, pero no importa, porque no sé cuántas tablas tienes, pero verás que la columna A de esta hoja de trabajo es toda la tabla. nombres.