Foro de elhacker.net

Bien... al parecer mi pregunta anterior era demasiado sencilla (tal vez por eso nadie respondió).

Pero me encontré con algo un poco complicado.

Estoy trabajando con macros y necesito obtener el las celdas seleccionadas tras haber realizado un autofiltro.

Por ejemplo, realizo el filtro por sexo y grupo de edad, las celdas que no cumplieron ese criterio se ocultan.
Al realizar la selección de los datos también se seleccionan las celdas (filas ocultas).

Hay alguna manera que mediante visual basic pueda obtener ya sea los numeros de filas o celdas 34, 103, 172, 241, 310 y 379?


(http://goo.gl/T58gr)

Gracias

' Masomenos...
For Each cell In Cells_To_Sum
   If cell.Rows.Hidden = False Then
      If cell.Columns.Hidden = False Then
         total = total + cell.Value
      End If
   End If
Next

:http://support.microsoft.com/kb/150363/es

Genial :3

Function Sum_Visible_Cells(Cells_To_Sum As Object)
 
       Application.Volatile
       Dim celdas As String
 
       For Each cell In Cells_To_Sum
           If cell.Rows.Hidden = False Then
               If cell.Columns.Hidden = False Then
                   celdas = celdas & Replace(cell.Row, "$", "") & ", "
               End If
           End If
       Next
 
       Sum_Visible_Cells = celdas
 
End Function
 

Ya lo estoy adaptando xD, solo que necesito hacer un cast de Range a Object o String a Object ._. porque lo utilizo así para tomar el rango seleccionado.

rango = Selection.Address
 

Gracias ;)

Por cierto tu avatar es genial xD siempre me ha causado gracia.