Red de conocimiento informático - Material del sitio web - Cómo seleccionar varias hojas de trabajo usando VBA

Cómo seleccionar varias hojas de trabajo usando VBA

La solución para cómo EXCEL selecciona todas las filas que cumplen las condiciones de varias hojas de trabajo y genera una nueva tabla es la siguiente:

1. Abra el documento EXCEL a procesar,

2. Presione alt+f11, abra la ventana de edición de vba,

3. Haga doble clic en la hoja de trabajo de la izquierda,

4. Ingrese el siguiente programa en el espacio en blanco de la derecha. /p>

Sub liyoushang()

Hojas(Hojas.Count).Cells.ClearContents(borrar contenido)ClearContents

k = 1

Para i = 1 a Sheets.Count - 1

For j = 1 a Sheets(i).Range("a6000").End(xlUp).Row

If WorksheetFunction.Trim (Sheets(i).Cells (j, 2).Text) = "B" Entonces 'B se refiere al nombre de la empresa, reemplácelo en consecuencia

Sheets(i).Rows(j).Copy _

Destino:=Hojas(Hojas.Cuenta).Celdas(k, 1)

k = k + 1

Finalizar si

Siguiente

Siguiente

Fin Sub

5. Haga clic en Ejecutar en la barra de herramientas,

y listo.