Filtrar la data a través de Scripts

Si lo que se tiene es un objto de tipo reporte el filtro se realiza de la siguiente manera:

' se realiza el filtro
dim dimension
dimension = reporte.DimensionLine.Item("Fecha")
dimension.Change("2004")
dimension.Change("Junio")
dimension.Change("24/10/2005")

'Luego se procede con la carga de datos
...
For i As Integer = 0 To iFilas
For j As Integer = 0 To iColumnas
Me.aDatos(i, j) = _
reporte.CellValue(reporte.rows.item(iPosFila + i), _
reporte.columns.item(iPosColum + j))
Next
Next
...
'
dimension.ChangeToTop()
...
'
En el ejemplo se tiene que crear el objeto de tipo reporte luego de ello se realiza el filtro antes de obtener los datos del reporte y luego finalmente obtener devolver a la dimensión a su primer nivel.