elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: (TUTORIAL) Aprende a emular Sentinel Dongle By Yapis


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Obtener celdas activas con vb despues de aplicar filtro en excel.
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Obtener celdas activas con vb despues de aplicar filtro en excel.  (Leído 3,451 veces)
1mpuls0


Desconectado Desconectado

Mensajes: 1.186


Ver Perfil
Obtener celdas activas con vb despues de aplicar filtro en excel.
« en: 22 Enero 2013, 17:47 pm »

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?




Gracias



En línea

abc
Shell Root
Moderador Global
***
Desconectado Desconectado

Mensajes: 3.723


<3


Ver Perfil WWW
Re: Obtener celdas activas con vb despues de aplicar filtro en excel.
« Respuesta #1 en: 22 Enero 2013, 18:13 pm »

Código
  1. ' Masomenos...
  2. For Each cell In Cells_To_Sum
  3.   If cell.Rows.Hidden = False Then
  4.      If cell.Columns.Hidden = False Then
  5.         total = total + cell.Value
  6.      End If
  7.   End If
  8. Next
:http://support.microsoft.com/kb/150363/es


En línea

Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.
1mpuls0


Desconectado Desconectado

Mensajes: 1.186


Ver Perfil
Re: Obtener celdas activas con vb despues de aplicar filtro en excel.
« Respuesta #2 en: 22 Enero 2013, 19:21 pm »

Genial :3

Código
  1. Function Sum_Visible_Cells(Cells_To_Sum As Object)
  2.  
  3.       Application.Volatile
  4.       Dim celdas As String
  5.  
  6.       For Each cell In Cells_To_Sum
  7.           If cell.Rows.Hidden = False Then
  8.               If cell.Columns.Hidden = False Then
  9.                   celdas = celdas & Replace(cell.Row, "$", "") & ", "
  10.               End If
  11.           End If
  12.       Next
  13.  
  14.       Sum_Visible_Cells = celdas
  15.  
  16. End Function
  17.  

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.

Código
  1. rango = Selection.Address
  2.  


Gracias ;)

Por cierto tu avatar es genial xD siempre me ha causado gracia.
En línea

abc
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Verificar contenido de celdas Excel con POI Java
Java
IntoxicKat 2 17,952 Último mensaje 9 Enero 2010, 11:43 am
por Debci
como jalar datos de celdas de excel
.NET (C#, VB.NET, ASP)
_CrisiS_ 1 4,602 Último mensaje 11 Abril 2011, 13:28 pm
por Novlucker
EXCEL Y BLOQUE DE CELDAS
Software
chano 1 3,357 Último mensaje 27 Junio 2011, 02:48 am
por Novlucker
Obtener rango de celdas seleccionadas en excel con vb [SOLUCIONADO]
.NET (C#, VB.NET, ASP)
1mpuls0 1 7,938 Último mensaje 22 Enero 2013, 17:34 pm
por 1mpuls0
Permitir celdas vacías en un vector de datos tomado desde Excel
Programación C/C++
Javier_Fig 0 1,468 Último mensaje 20 Julio 2015, 17:26 pm
por Javier_Fig
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines