Definir un rango con varias hojas en VBA

Hola Experto, quisiera saber si es posible definir rangos que contengan varias hojas, para posteriormente llenar un ListBox y aplicar un filtro.(ya el código exite pero con otro propósito)

En el código:

Private Sub filtrargp()
    Application.ScreenUpdating = False
    Sheets("LISTBOX").Range("B10").CurrentRegion.Delete xlShiftUp
    With Sheets(Me.ComboBox1.Text)
    uf2 = .Range("B" & Rows.Count).End(xlUp).Row
    With .Range("B10:H" & uf2)...

El filtro se ejecuta sobre la hoja seleccionada en el "ComboBox1", pero quisiera que sea en un rango de hojas. Por ejemplo: si se selecciona un OptionButton1 se aplique el filtro a un rango dado por las hojas ("Hoja1", "Hoja2", "Hoja3") y que si selecciono el OptionButton2 se aplique a las hojas ("Hoja4", "Hoja5", "Hoja6").

Tal vez sea algo muy elemental, pero no se como cambiarlo.

De antemano, muchas gracias por tu acostumbrada ayuda!

Un saludo,

waboni

1 Respuesta

Respuesta
1

Para mí, no fue tan elemental, me costo trabajo, pero ya quedó.

Te envié el archivo.

Saludos. Dam

Nuevamente, muchísimas gracias por toda tu ayuda!

Ups! lamento que resultara más complicado de lo que parecía! Y si a ti te costó trabajo hacerlo, imaginate a mi! afortunadamente hay gente como tu.

Quedó excelente!

Saludos cordiales!

waboni

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas